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ABSTRACT 


A microprocessor development system (MDS) for the Intel 
8748 microcomputer was designed and built around the Naval 
Postgraduate School's TRS-80 computer system. This MDS 
provides the capability to use the TRS-80 as an editor to 
write and edit 8748 mnemonic programs and store them on a 
magnetic disk. Also developed was an assembler to convert 
the user generated source program into object code. As a 
final step, a software driven hardware programmer has been 
constructed to enable the object code to be loaded into the 
Erasable Programmable Read Only Memory (EPROM) on the 8748 


microcomputer chip. 
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TOP INTRODUCTION 


The Electrical Engineering (EE) Department at the Naval 
Postgraduate School operates a small but growing micro- 
processor/microcomputer laboratory. “This laboratory supports 
several EE courses in microprocessor applications as well as 
student thesis efforts. Since the primary thrust of these 
efforts is the implementation of microprocessors in operat- 
ing circuits, the most useful tool to have available is the 
microprocessor development system (MDS). Such a system will 
typically allow the user to write microprocessor programs 
in assembly level language using a keyboard and cathode ray 
tube (CRT) to provide for clarity and ease of editing. The 
MDS will then assemble the assembly level language into 
machine language and provide the capability to program an 
Electrically Programmable Read Only Memory (EPROM) with the 
newly generated program. Additional features normally avail- 
able on an MDS are a debugging facility which allows for 
dynamic operation of the program structure and an In-Circuit- 
emulator (ICE) to enable the MDS to plug into the circuit 
under trial and act as the microprocessor with memory. The 
system presently available in the EE laboratory for this 
purpose is built around the Tektronix 8002 development sys- 
tem which has modules for the Intel 8080 and the Motorola 
6800 microprocessors. Because of the availability of this 


development system, most projects have been designed around 





the 8080 and 6800 microprocessor which until recently have 
been representative of industry standards in an 8 bit word 
size machine. 

As an additional applications tool the school has ob- 
tained a number of Intel 8748 microcomputers. This single 
"chip" computer provides a complete system in one package 
and is useful particularly for controller oriented applica- 
tions. A more detailed description of this chip is provided 
in the next section. 

Because of the usefulness of the 8748 and the lack of a 
software controlled development system it was decided to 
design and build an MDS for the 8748 using the TRS-80 micro- 
computer. The TRS-80 had also been recently acquired by 
the EE department and expanded to include 64K bytes of 


memory, mini disk drive, and a printer interface. 





II. INTEL 8748 MICROCOMPUTER 


A majority of the Central Processing Units (CPU) on the 
market today are microprocessors only, requiring many sup- 
port chips such as bus controllers, clocks, RAM, ROM, and 
input/output (I/O) ports to allow for a functioning computer 
system. 

The Intel 8748 is technically more than a microprocessor. 
It is in reality a microcomputer and is advertised as such. 
The 8748 microcomputer is therefore a significant deviation 
from the support chip philosophy, trending instead toward a 
complete and self-contained system on one chip of silicon. 
While such a trend will provide for an increased miniaturiza- 
tion of many components and systems, such closed-end units 
have only limited capability to be expanded for larger ap- 
plications. For this reason a market will always exist for 
the support chip philosophy. 

The 8748 microcomputer is actually a development tool 
intended for use in engineering design for systems which 
Will eventually be equipped with one of several microcom- 
puters in the Intel MCS-48 product line. The other members 
of the MCS-48 family contain varying capabilities, all of 
which require off-chip memory or factory programmed ROM. 

The 8748 contains all of the capabilities of the other chips 
but utilizes a 1K on-chip EPROM. This EPROM allows the 
8748 microcomputer to be used to perfect the program for a 


given system, or it may be reused for many different applica- 





tions by erasing and reprogramming the EPROM. Thus, the 
8748 is an excellent tool for use by students in project 
work. 

The architecture of the 8748 microcomputer can be seen 
in Figure 1. This design utilizes NMOS technology to achieve 
the following capabilities: 

1. CPU with 8 bit word handling capability. 

Р. 1K x 8 EPROM. 

3. 64 x 8 RAM for data registers (in two banks). 

4. 27 I/O lines normally used as 3-8 bit I/O ports. 
5. 8 bit event counter. 

6. Single +5 volt power supply requirement. 

7. 8 level working stack. 


8. RC, LC, crystal, er external frequency source 
For clock. 


9. Single step mode for use in debugging. 
10. 40 pin dual inline pin (DIP) package. 

By selecting a 6 MHz clock crystal, the 8748 operates 
With an instruction cycle of 2.5 microseconds. This speed 
is on a par with the fastest of the CPU chips presently on 
the market, particularly when it is considered that 70% 
of the 8748 instructions are single byte and the remainder 
are only 2 byte. This compares with many of the major CPU 
chips which have 2 and 3 byte instructions. 

The following rin-out from Reference 1 describes pin 


Hemel zation: 
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Pus 





V Ground 


SS 
VD Programming power supply 
von 5 volt power supply 


P10-P17 Port 1 
P20-P27 Port 2 
Bus 


TO & ТТ Testable input pins 








IN Imterrupt input 

RD Output read strobe 
RESET Input to initialize 
WR Output write strobe 
ALE Address Latch Enable 
PSEN Program Store Enable. 


Used during fetch to 
external memory. 





SS Single step input 


EA External Access input. 
Forces all program memory 
fetches to external memory. 


XTAL 1 One side of crystal input 
or input for external 
clock. 

XTAL 2 Other side of crystal 
input. 


The instruction set for the Intel-8748 consists of 96 
total instructions. These instructions all execute in 
either 2.5 or 5 microseconds when using the 6 MHz crystal. 
Over half of them execute in a single cycle. Many of the 
instructions are designed to handle BCD and single bit 


operations for controller oriented applications. Figure 2 


Ша 





is a good picture of how the data transfer instructions 
interact. Reference 1 contains a complete description of 


both the hardware and software for the 8748. 


ша 









PROGRAM 
MEMORY 
(=data) 











MOVD | 

ANLD 

ORL D MOVX EXTERNAL 
EXPANDER MEMORY 
ек a) ACCUMULATOR BUS (8) NE 


4-7 PERIPHERALS 





MOV 
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Figure 2 - Data Transfer Instructions! 
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III. TRS-80 MICROCOMPUTER 


The TRS-80 microcomputer is a small hobby and business 
computer sold nationwide by Radio Shack franchises. At the 
time of this writing the company is credited with having 
sold over 135,000 units, making it the leader in total 
computers sold. The TRS-80 is built around the Zilog 2-80 
microprocessor which is an evolution from the Intel 8080. 
The TRS-80 has several different levels of capability based 
on a building block approach. The lowest block available 
is the keyboard/computer with only 4K of RAM and a very 
simple BASIC language capability. The highest block is 
that which is currently available in the EE lab's model. 
This includes a total 64K of memory and disk BASIC which is 
loaded into the RAM from a mini-disk (5%" diskette) drive. 

The TRS-80 is a memory mapped system providing fixed 
addresses for various preprogrammed functions such as video 
display. Figure 3 shows the 64K system memory map and re- 
veals which portions of memory are available for general 
user use, normally the highest 48K of RAM. The preprogram- 
med functions are, of course, in ROM. The user accessible 
RAM is dynamic, with a 450 millisecond access time and a 
refresh period of 2 milliseconds. Figure 4 shows a macro 
block diagram of the TRS-80 system. 

The TRS-80 in this configuration uses an operating 


system (OS) called TRSDOS (TRS Disk Operating System). 


ILS 





Х 0000 I/O DRIVERS AND BOOTSTRAP 


X'0400 


LEVEL li BASIC/DISK BASIC 









X'3000 
“ON-BOARD” MEMORY MAPPED 1/0 
MEMORY 
Х 4000 BASIC VECTORS 
x ‘4200 
TRSDOS 
Х 5200 DISK BASIC 
16 KRAM TRSDOS UTILITIES 
USER MEMORY 
Х 7000 | GENERAL PURPOSE 
pa USER MEMOR Y 
X'8000 
AUXILIARY USER MEMORY 
EXPANSION 
INTERFACE 


X'C000 


AUXILIARY USER MEMORY 


X'FFFF 


Figure 3 - TRS-80 Memory Map 
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This OS is analagous to the operating systems used on large 
computers. It enables the user to communicate with the 
computer using only high level languages and relieves him of 
the need to manage such computer housekeeping functions as 
where to store programs and interfacing the CPU with the 
I/O and storage devices. Thus, the machine level language 
operations are normally transparent to the user. Programs 
written in 2-80 machine language can, however, be loaded 
and run in the TRS-80 using two different methods. One is 
to load the machine language from a "system" tape which has 
the program already loaded on it. The other method is to 
use the BASIC command POKE (address, value) to load one 
word at a time. It is interesting to note that the vari- 
ables in the POKE command must be in decimal, which means 
tino all addresses and program instructions from 
hexadecimal to decimal. 

The Postgraduate School's TRS-80 system also includes 
an "expansion interface." This unit interfaces directly 
with the computer and contains 32K words of the total 64K 
possible memory. It also has a number of bus outputs which 
provide for parallel printer output, disk drive operations, 
RS-232 serial I/O and a full system bus for user access. 

Since the computer lab already had a very good line 
printer in the Teletype model 40, it was decided to utilize 
this printer for the TRS-80 output. The model 40 is an RS- 
232 serial data unit, however, and the original TRS-80 


provided no serial output for listing of programs. Instead, 
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Radio Shack sells several printers which are driven by 

the TRS-80 parallel output. The first attempt at interfac- 
ing was conducted as part of a student thesis. This project 
involved construction of a parallel to serial conversion 
device using standard Universal Asynchronous Receiver Trans- 
mitter (UART) techniques. Unfortunately, the TRS-80 does 
not output a carriage return on its printer bus. Both the 
carriage return and line feed are driven by the line feed 
output in the Radio Shack printers. Since both signals 

are required individually to drive the TTY printer, it was 
necessary to use an Intel 8748 microcomputer chip, in con- 
junction with the UART, to provide a carriage return each 
time a line feed was recognized on the bus. While this de- 
vice did allow for output to the printer, it had a persist- 
ent problem of also inserting random line feeds which re- 
sulted in undesirable appearing printouts. 

It was decided, shortly after the parallel-serial con- 
version device failed completely, to purchase Radio Shack's 
RS-232-C interface unit. This saved many manhours of addi- 
tional engineering effort and provided for trouble-free 
printer output. One drawback to using this serial output 
method is that the unit is driven via special software which 
must be loaded into user RAM each time the system is powered 
up. The small machine language program to accomplish this 
1s initially stored in the highest portion of memory and 
then write protected to prevent the system from putting 


other data in those memory locations. This memory 
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protection feature is part of the operating system and is 
implemented on power up by answering the question MEMORY 
SIZE? with a decimal address. А11 RAM above that address 
is then locked out of being utilized for BASIC prograns. 
The assembly level language program required for operation 
of the serial printer output is provided in Appendix A. 
Several switch selections on the RS-232-C board allow the 
TRS-80 to also be used as a terminal for another computer 
at several different baud rates. Reference 2 provides fur- 
ther details on operation of the RS-232 unit. 

The disk BASIC language used in this machine is a very 
capable high level language. The commands are simple and 
straightforward while providing maximum capabilities. It 
15 especially strong in the number of commands available 
for manipulating "strings" of alphanumeric characters. This 
ability made BASIC an excellent choice in this MDS applica- 
tion References 3, 4 and 5 contain the BASIC commands 
available along with descriptions and sample applications. 

while the user of the MDS system does not normally re- 
quire knowledge of DOS or system commands, there are sev- 
eral which might be of use. To give a better picture of 
how the different modes interact with one another, the map 
in Figure 5 is provided. To get from one operating mode 
to another, code words provided in this map are typed and 
"ENTER" is depressed. In the case of going from the 8748 
editor/assembler, the words "press BREAK key" are not typed. 


Rather there is a key in the upper right hand corner labeled 
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TRS-80 Disk Operating System (TRSDOS) 


Disk BASEC 


8748 Editor/Assembler/Programmer 


8748 EDITOR/ 
ASSEMBLER ON 
LINE 
Press 
BREAK Key 


RUN "EDTASM" 





DOS READY 


Figure 5 - Inter Mode Map 


21 





"BREAK." Holding this key down for several seconds will 
cause program execution to halt. The word READY will then 
be printed, indicating the system is in BASIC mode. 

The primary commands useful to the MDS user while in 


TRSDOS are listed below: 


DIR Lists all user files stored on 
the disk. 

DIR (A) Lists all user files along with 
the space taken up by those 
files. 

LIST (filename) Prints the contents of the 
file on the CRT. 

KILL (filename) Erases the chosen file (file- 
name). 

FREE Lists total disk space remain- 


ing. (Each diskette holds 48 
user files and 44 maximum 
granules. For a further dis- 
cussion of files and granules 
see Ref. 4.) 


BASIC Transfers to the BASIC mode. 


While in the BASIC mode the following commands are 


usable: 

сів) "S" Transfers to TRSDOS mode. 

KILL (filename) Erases file (filename). 

LIST Prints present program on the 
СЕТЕ 

RUN Runs the program currently in 
TRS-80 memory. 

RUN "EDTASM" Loads and runs the 8748 


editor/assembler. 
Commands to be used in the 8748 editor/assembler mode 


are covered in the next several chapters. 
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IV. MICROPROCESSOR DEVELOPMENT SYSTEM SOFTWARE 


Once the topic for this thesis had been selected, most 
of the bounding parameters were automatically defined. The 
choice of the Intel 8748 defined the assembly level lang- 
uage to be used. Selecting the TRS-80 as the computer sys- 
tem in which to implement the microprocessor development 
system defined the majority of the hardware as well as the 
programming languages to use. The major decisions remaining 
to be made involved what capabilities to include in the MDS. 
The components normally present in a typical MDS are listed 
below: 

IC а сог 

2. Assembler 

3. Debugger 

4.  EPROM Programmer 

сиви Ти Circurt Emulator (ICE) 

Because of the finite time available to carry out this 
project, it was decided to concentrate on the components 
which were an absolute requirement to provide an ability 
to implement a programmed 8748 microcomputer. For this 
reason an editor, assembler, and EPROM programmer were in- 
cluded as the most essential tools. Additional hardware 
and software room has been left in the project to allow 
future student projects to concern the debugger and ICE as 


additions to this MDS. As a possible adjunct to the MDS, 
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groundwork was also laid for a software driven EPROM pro- 
grammer for the Intel 2708 and 2716 chips. These EPROMs 
would not normally be used with the 8748 microcomputer, but 
their prevalence at the school for other applications, along 
with a paucity of easy to use programmers, made such an 
addition to the MDS desirable. Unfortunately time did not 
allow for completion of that effort. 

For the software portion of this project, it was decided 
to use the BASIC language capability of the TRS-80 rather 
than the Z-80 machine language. While the machine language 
would have been more efficient and would have executed faster, 
the use of BASIC was selected primarily due to the consider- 
able and time consuming effort required to write the soft- 
ware programs in assembly level language. 

The BASIC software is eren down into four Ба 
programs rather than loaded as one large program for several 
reasons. First, it was desired to minimize the amount of 
system memory taken up by the operating program to allow 
for maximum room for 8748 program lines and comments. Sec- 
ondly, calling another program into memory is made especial- 
ly simple with the disk system because the storing of data 
and loading of programs is so straightforward and rapid. 
Third, the function of the editor, assembler, and EPROM 
programmer are different and independent of each other. 
Fourth, the writing of each program is simpler if it is an 
entity independent of the other programs. Thus, the soft- 


ware for the MDS is broken up into the following programs: 
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EDTASM Loads the printer serial output 
machine language program into 
memory and loads and runs the 
editor program. 

MASTER Editor program. Provides for input- 
ting and editing of 8748 assembly 
language programs. Transfers to 
assembler upon command. 

ASSEMBLE Assembles 8748 mnemonics to machine 
language represented in hexadecimal 
format. Provides CRT printout of 
errors. Also provides hard copy 
printout of assembled program. 

PROGRAM Converts assembled hex code to decimal 
and outputs to the programmer.  Veri- 
fles EPROM is correctly programmed. 
Reads EPROM upon command. 

A. EDITOR PROGRAM 

The first portion of this thesis was development of the 
editor for use in entering the Intel mnemonic code for the 
8748 into the MDS. Use of mnemonics is an integral part of 
an MDS because writing the programs for the 8748 or any other 
computer would be a difficult and time consuming task if 
machine language were used. The major advantage of mne- 
monics is that they have an English language meaning while 
machine language is simply a string of numbers in one of 
several possible bases. 

In addition to providing a neat format for entering 
mnemonic instructions, the editor provides many operator 
alds. Among these useful aids are an "edit" mode to allow 
for changes, additions, and deletions to the program text; 


a comments column to allow the operator to describe what 


various program steps do; and a capability to store the 
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program under development on magnetic disk for further 
editing at a later time. 

The operating format for the editor program is apparent 
by examining the flowchart in Appendix B. The program is 
written to provide for a number of modules, each of which 
operates independently of the other. Figure 6 shows the 
relationship of these modules. 

To begin editing a program, the operator first loads 
the system as described in Appendix E. When the statement 
"enter mode selection" appears on the CRT the operator first 
types in INPUT to enter that mode. INPUT is repeated on 
the CRT to confirm to the operator that he is in that mode. 
Using the mnemonics listed in either Ref. 1 or Ref. 6, the 
desired assembly level program for the 8748 is entered. 
Correct format for these line entries is accomplished by 
using the right arrow key (>) on the TRS-80 which provides 
a tab to columns at 8, 16, 24, 32, 40 and 48 spaces across. 
The first column contains only labels consisting of one to 
six letters and followed by a colon (:). If no label is 
used, this column is left blank. The second column contains 
the opcode of the desired instruction. The third column 
contains the operand applicable to the opcode selected. The 
operand must be in decimal rather than hex code for quanti- 
ties. In the case of addresses, the operand must be a one 
to six letter label which will be used to point to the cor- 


rect address during assembly. The fourth column is available 
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for any comments the user may desire to include for the 
purpose of describing program operations. These comments 
must be preceded by a semicolon (;) to prevent the assembler 
from confusing comments with operands. If the operand is 
longer than the 8 spaces available in the third column, the 
comments are started after several spaces instead of pressing 
the tab key to the fifth column. 

Because of the large amount of memory required to store 
comments it is desirable to limit both the length and num- 
ber used to a minimum. Also, the TRS-80 allows for single 
strings of a maximum 256 bytes in length. Since each pro- 
gram line (including comments) is stored as one string, the 
256 byte limit will be exceeded if too long a comment is 
included and the error "string too long" will appear. This 
will result in the system dropping out of RUN and back to 
BASIC mode. If this occurs, all data previously entered in 
memory will be lost when the program is reinitiated. If 
this or any other error results in the program "bombing," a 
READY will appear on the CRT indicating the system is in 
BASIC mode. To get back into the editor/assembler again 
simply type RUN "EDTASM". 

Once the complete program has been entered using the 
input mode, it is desirable to check for errors in the edit 
mode by typing EDIT. If the user were confident of his 
input he could simply enter FILE (filename) which transfers 
his 8748 program, complete with comments, to disk storage. 


The filename used with this command can be any group of 
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letters from one to eight in length. One space must be 
allowed between FILE and the filename when typing it in.- 

Another option for leaving the input mode is to enter 
QUIT which puts the program back in the command mode after 
resetting the pointer to zero. This command causes all | 
previous lines written to be lost. 

Assuming the user went directly from the input to the 
edit mode, the next logical choice of action would be to type 
PRINT and check the program listing on the CRT for errors. 
In the event the program is too long to fit on the screen 
the rapid scroll can be halted by pressing shift and @ 
simultaneously. The scroll is started again by striking 
the space bar (or any other key). 

When entering the edit mode the editor pointer will be 
pointing to the first line in the program and that line will 
be displayed on the CRT. The pointer can be moved by using 


the following commands: 


UP Moves the pointer up one line. 

DN Moves the pointer down one line. 

EOF Moves the pointer to the end of the file. 

TOF Moves the pointer to the top line of the file. 


The command "L /substring/" is used to move the pointer 
to the location of the first line in the text which contains 
the exact substring located between the slash (/) lines. 

One space must be provided between the "L" and the first 
"/". Note that no quotes (") are actually used in this 


command. The length of the substring is not critical but 
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it should be long enough to ensure the program does not 
locate another line with that same short substring. 
Once an error is located and the pointer is at that 
line the following commands are used to make corrections: 
C /substring l/substring 2/ Replaces all of sub- 
Strung withoall ot 
substring 2. Again, one 


space must be inserted 
between the "C" and the 


faust 7T, 
DEL Deletes the entire line. 
INS Provides for insertion 


of a new line above the 
current pointer position. 





When all editing has been completed, the operator would 
use the command FILE (filename) again to place the program 
on the disk. If assembly of this program is then desired, 
the command ASM (filename) is entered. A single space must 
be inserted between the "ASM" and the filename. This results 
in the program "filename" being stored on the disk under the 
name "STORE" to enable the assembler program to know which 
file to assemble. The assemble program is then loaded into 


memory from disk storage and executed. 


В. ASSEMBLER PROGRAM 

This program has the responsibility for converting the 
assembly level mnemonics into hex code. The TRS-80 auto- 
matically converts the hex code to binary for loading into 
the EPROM on the computer chip. This is an extremely lengthy 
program which, without a great deal of sophistication, exam- 


ines each mnemonic in turn and assigns the correct hexadecimal 
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code for further action. The basic flowchart for ASSEMBLE 


can be seen in Appendix C and the program listing is in 


Appendix H. The following variable usage is assigned for 


this program: 


Х (1) Full line from editor. 

T Full line but with comments deleted. 
BK Number of bytes in a given opcode. 
D(L) Byte number in decimal. 

HXŞ (L) Byte number in hex. 

V(I) Label (if any). 

Y (L) Hex code for opcode with 2 byte 


instructions. 


Z (L) Hex code for opcode 
instruction or data 
tions. 

U(L) рат ее а пе Г. 


The first task carried out by this 
the desired 8748 mnemonic program into 


The next step is to complete the first 


with single byte 
For 2 byte instruc- 


program is to load 
memory from the disk. 


pass of the assembler. 


Each line of input is looked at in sequence. The first 8 


spaces of the line are examined first to determine if that 


line has a label. If it does, the label is stored in mem- 


ory for use by the second pass assembler in determining 


intra-program directives. The next step is to examine the 


first line for the opcode ORIG. If this code is present, 


the operand, which is the user's desired start address, is 


stored for use in beginning the byte count at that address. 


The program then checks each opcode in 


EE 


sequence to see if 





Ше с a one or two byte instruction. The appropriate 
number is added to the present instruction address to deter- 
mine the next instruction address. When the opcode END is 
recognized the first pass is completed and no address is 
assigned to that line. If the opcode END is not present, 
the program merely exits to the second pass assembler after 
the line count number reaches that number which was passed 
from the editor. 

As each line is looked at and an address is assigned 
in the first pass, that line, with numbering, is printed on 
the CRT to keep the operator aware of assembly progress. 
The format for this printout is as follows: 

LINE NUMBER HEX ADDRESS MNEMONIC CODE COMMENTS 

Upon completion of this phase, FIRST PASS COMPLETED is 
printed on the CRT and the second pass of the assembler 
begins automatically. The task of the second pass is two- 
fold. First, the mnemonic opcode and operand are converted 
to the appropriate machine language in hex code. Second, 
each time an operand is located which requires an address, 
the label representing that desired address is searched for 
in the list of labels formerly made up in the first pass. 
When the label is located, the corresponding address is 
used as the second byte of the calling two byte instruction. 
As an example, consider the following lines of program: 


Line Address Code Label Opcode Operand 


03 03 0407 JMP BACK 
04 05 8909 MOV R1,#9 
05 07 59 ВАСК АКТ А, В1 
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In this example the programmer desires to jump to line 
5 upon executing line 3. When the second pass reaches line 
3 it first recognizes the opcode JMP and assigns the approp- 
riate hex code of 04. The assembler then looks for what 
address to JMP (jump) to and looks at the operand BACK. 
The program then searches through the labels tabulated dur- 
ing the first pass and locates BACK. It then brings the 
address associated with that label, 07, back to add onto the 
JMP code to form the two byte instruction 0407 as seen 
above. The code column in this example is not added until 
the second pass is actually completed. | 
The actual search process of the second pass is done 
in two steps to increase speed of execution. Except for a 
few singular instructions, the first look is at 38 groups of 
instructions by dues Once the opcode group heading is 
recognized, the assembler jumps to a subroutine which as- 
signs the specific hex code for that opcode and operand. 
Upon completion of that step the assembler returns to the 
beginning of the opcode list to begin again. An attempt has 
been made to arrange the opcode groups so that the more 
frequently used will be at the top of the list to provide 
faster average locating speed. During this process the 
assembler also identifies errors which are filed for display 
when assembly is completed. The recognized errors and 
meanings are listed below. 
SYNTAX ERROR Opcode or operand are not 
recognized. Probably an 


incorrect format or mis- 
Spelled. 
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DATA EXCEEDS BYTE SIZE A number greater than 255 
is being used. 


REGISTER SIZE EXCEEDS 7 Use of a non-allowed 


register. 

R EXCEEDS 1 Register should be 0 or 
only: 

INCORRECT PORT # Use of port not allowed 


in chagminstruction:i 

During execution of the second pass, as the code for 
each line is generated, it is presented on the CRT. Again, 
this presentation is provided to the operator so that he 
can follow the progress of assembly. After assembly is com- 
pleted, that fact will be noted on the screen along with 
the statement 0 ERRORS, or the number of errors followed by 
the line number of each error and the error found in that 
line. If the line printer is connected and turned on prior 
to the end of assembly, a printout will be provided which 
will list the following data for the entire program: 
Line No. Hex Address Hex Code Label Opcode Operand Comments 
See Appendix J for a sample assembled program printout. 

Errors that were detected will be printed below the line 
affected. At the end of this printout a tabulation is pro- 
vided for reference listing the labels and the address they 
are located at. If no errors were detected, the program 
then loads the object code (machine language hex code) onto 
the disk and calls the program PROGRAM for the purpose of 
programming the assembled code into an 8748 EPROM. This 


code is filed under the name assigned by the user but with 
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an "0" appended to the name after the last letter. This 0, 
of course, represents object code. 

If upon completion of the assembly and printout, errors 
had been detected, the editor program is called and run to 
enable the operator to correct his mistakes. 

Under the circumstances where the operator had either 
accidentally or deliberately failed to connect the TRS-80 
to the line printer and to turn the printer on, the system 
will "freeze up" after assembly is completed. The recovery 
procedure is to press the "BREAK" key until READY appears 
on the screen. The system is now in BASIC mode. If errors 
have been detected and the user wants to examine the line 
numbers in which errors existed, he can enter the command 
RUN and use the shift key and @ key simultaneously to stop 
the scroll of assembled lines to check errors. To return 
to the edit mode again, simply allow the assemble program 
to continue to run until it calls the edit program, or press 
the break key to return to BASIC mode and type RUN "EDTASM". 

It should be noted that if ASSEMBLE runs to completion 
and does not locate any errors it will automatically load 
the object file onto the disk before proceeding. If any 
errors are located, however, the object code will not be 


Saved since it is not correct. 


C. PROGRAMMER PROGRAM 
The purpose of this program is to enable the system 


user to load his assembled program into the EPROM of an 8748 
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microcomputer. This is accomplished through associated 


hardware which is 
gram and hardware 
EPROM in order to 


the program named 


discussed in the next chapter. This pro- 
also enables the user to read an 8748 
verify its contents. The flowchart for 


"program" is located in Appendix D and 


the program listing is Appendix I. 


This program is normally executed upon successful com- 


pletion of the assembly program, but may also be entered 


directly from BASIC mode by typing RUN "PROGRAM". Before 


running this program, however, the programmer assembly must 


be connected to the TRS-80 I/O bus. This connection should 


not be attempted while a program is running because elec- 


trical transients may be generated which could halt program 


execution. 


When the program is initiated it will first present the 


Statement ENTER PROGRAM MODE. The user may then select one 


of the following commands: 


STOP 


EDIT 


RP ROM 


Ends program execution and 
returns to BASIC mode. 


Loads and runs the editor program. 


Used to read an EPROM. 


WPROM (filename0) Used to write to an EPROM. The 


"0" must be added to the file- 
name to designate the object 
file. 


Any other command will result in the statement ILLEGAL 


COMMAND-- TRY AGAIN being presented on the CRT. 


Whether the WPROM or RPROM mode is selected, the same 


setup routine is used. This routine first asks the question 
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START ADDRESS IN DECIMAL? to which the operator answers with 
a decimal number indicating the EPROM address in the 8748 

he desires the reading or writing to start at. The next 
question will be END ADDRESS IN DECIMAL? which asks for the 


last EPROM address to be read or written to. If the end 


Ра 
A 


address entered is greater than the start address, the 
statement ILLEGAL ADDRESS will appear on the screen followed 
by the start address question again. Likewise, if either 
the start or end address are greater than the 1024 byte 
capability of the EPROM, the statement ILLEGAL ADDRESS will 
again appear. If the first two questions are answered 
satisfactorily the next question EPROM SOCKET EMPTY? (YES 

OR NO) will appear. This is to ensure that the EPROM is not 
inserted in the socket before power is applied and initial 
setup is completed. Other actions could result in damage 

to the 8748 chip. If the answer to the socket empty ques- 
tion is YES, the next question will be IS POWER SWITCH ON? 
(YES OR NO). If power is not yet on this is the time to 
turn it on. When the answer to this question is YES the 
program sets the hardware to the required initial conditions 
and prints the hexadecimal code of the object program about 
to be loaded on the CRT. The statement INSERT 8748 CHIP 

AND TYPE-GO: is then presented. It is especially important 
here that the 8748 chip not be inserted incorrectly in the 
Socket as considerable damage to the chip would result. 


Once the command GO is typed and entered, the program will 
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return to either the RPROM or WPROM routine originally 
selected. 

If RPROM had been selected, the desired address of the 
EPROM would be queried and the data at those addresses in- 
put to program memory. Since this data is input to the 
BASIC mode in decimal format, it must be converted to hexa- 
decimal before presenting to the operator on the CRT. This 
presentation is made in the following format: 

Decimal Address XX XX XX XX XX XX XX XX XX XX XX XX XX 

XX XX XX 
where the decimal address is the address of the first in- 
struction in that row and XX is a hexadecimal representation 
of the machine language in that address. When all desired 
addresses have been printed, any spaces left in that row 
will be filled with 00 and the program will reinitialize 
the electronics in the programmer and provide the message 
REMOVE EPROM NOW--THEN TURN POWER OFF. This is to ensure 
power is not turned off before the EPROM is removed. The 
program then returns to start with the statement ENTER 
PROGRAM MODE. 

If the user had originally selected WPROM and given the 
correct name of the object code file on disk, the first 
step would have been the loading of the object file into 
TRS-80 memory. The initialization routine discussed above 
would then have been completed and the programming process 
commenced. The program is loaded into the EPROM one byte 


at a time. Each address requires approximately 100 milli- 
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seconds to program so the user should expect about one second 
of programming time for each 10 instructions. During the 
100 msec cycle the program first inserts data into the given 
address and then reads that same address. The decimal num- 
ber read is compared by the program with the number which 
should have been programmed. If the two numbers are not 
identical the EPROM programming ceases and the statement 
PROGRAMMING ERROR--ERASE EPROM AND TRY AGAIN will appear, 
followed by REMOVE EPROM NOW--THEN TURN POWER OFF and a 
return to program start. If this does occur, the most 
likely cause is that the EPROM was not thoroughly erased 
before programming. It is also possible, however, that the 
EPROM is defective or that the programmer is operating 
incorrectly. Check also to see that programming power is 
turned on. | 

If no errors are detected in the verification routine, 
the statement PROGRAMMING COMPLETED SATISFACTORILY will appear 
followed shortly by REMOVE EPROM NOW--THEN TURN POWER OFF and 
ENcturn to program start. 

If the user desires to run several RPROMs in succession 
or an RPROM followed by a WPROM or vice versa, it is not 
necessary to remove and reinsert the 8748 chip each time. 
Simply ignore the command to remove the EPROM and proceed 
with the steps in order. The questions EPROM SOCKET EMPTY? 
and POWER SWITCH OM? may both be answered YES with no ill 


effects. The important point to remember is to not remove 
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the EPROM until the second to last statement on the CRT is 


REMOVE EPROM NOW--THEN TURN POWER OFF. 
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V. PROGRAMMER HARDWARE AND OPERATION 


The design for the hardware portion of the 8748 EPROM 
programmer was based on the requirements set forth in Ref. 1. 
Reference 7 provided additional assistance in switching cir- 
cuit techniques and methodology. Figures 7 and 8 show the 
schematic for the final programmer design. Figure 9 shows 
component arrangement on the circuit board. 

In first examining the possibilities for interfacing 
the TRS-80 with an EPROM programmer, the question of output 
procedure arose. The TRS-80 is able to provide an output 
via either memory mapped or port selection modes. Since 
the memory mapped system requires memory addresses to be 
used for output and input, this method had to be rejected. 
With all possible 64K of addresses already in use for either 
RAM or ROM, much confusion could result. The port based 
system allows only 255 possible ports, but this is more 
than sufficient if much of the work is done by the TRS-80 
software rather than programmer hardware. In fact, for this 
8748 programmer only 4 ports are needed. In the port sys- 
tem the commands used are OUT (port), (value) and INP (port) 
in the BASIC language. The OUT command sets the OUT line 
low, simultaneously putting the port number on the lower 
eight address lines and the desired value on the eight data 
lines (data bus). Likewise, the INP command sets the IN 


line low while outputting the port number on the lower eight 
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Figure 8 - Programmer Schematic 
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address lines. The data present on the data bus is then 
read into the TRS-80. 

The first major obstacle to overcome in preparing the 
design of the programmer was to verify the correct pinout 
from the TRS-80 I/O port. 

Since Ref. 8 has no data on the TRS-80 expansion inter- 
face it was largely up to the author to verify the pinout. 

In connecting up to the I/O port a flat cable 40 pin connect- 
or left over from another TRS-80 application was used. After 
some time was spent searching for signals out of this cable 
it was discovered that the cable and connectors are wired 

to reverse the signal from top to bottom. That is, the top 
row of signals in one end of the flat cable comes out on the 
bottom row at the other end and vice versa. The similar 
cable coming from the computer/keyboard to the expansion 
interface of the TRS-80 also reverses the signals top to 
bottom. The interface board is wired to again reverse the 
signals so they are upright coming out of the interface I/O 
port. Figure 10 shows the pinout of the expansion interface 
port. 

Once the proper pinout had been verified, the design 
and construction of the programmer board could begin.  Be- 
cause of their ready availability, it was decided to build 
the system on a 4 x 6 Vector plugboard with a 44 pin connect- 
or and which was predrilled for wirewrap sockets. This 


board provided for a compact unit easy to interface via 44 
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SIGNAL 
P/N | NAME DESCRIPTION 


Row Address Strobe Output for 16-Pin Dynamic Rams 
System Reset Output, Low During Power Up Initialize or 
Reset Depressed 
Column Address Strobe Output for 16-Pin Dynamic Rams 
Address Output 
Address Output 
Address Output 
Address Output 
Чупа! Сточпа 
dress Output 
Address Output 
Address Output 
Peripheral Write Strobe Output 
Memory Write Strobe Output 
Interrupt Acknowledge Output 
Memory Read Strobe Output 
Multiplexor Control Output for 16-Pin Dynamic Rams 
Address Output 
Bidirectionai Data Bus 
Peripheral Read Strobe Output 
Bidirectional Data Hus 


сл > мн о ео усл Nr 


Interrupt In три: (Maskable) 


Бацерцов Data Bus 

A Logic ‘9’ on TEST* Input Tri-States A A15, D9-D7, 
WR*, RD*, IN*, OUT*, RAS*, CAS*, MUX* 

Bidirectional ‚Data Bus 

Address Out 

Bidirection Data Bus 

Address Out 

Bidirection Data Bus 

Signal Ground 

Bidirectional Data Bus 

Address Bus 

Bidirectional Data Bus 

Processor Wait Input, to Allow for Slow Memory 

Address Output 

Address Output 

Address Output 

Signal Ground 

Address Output 


Хата ess output 





2 4 6 8 10 12 14 16 18 20 22 24 26 28 30 32 34 36 38 40 


Figure 10 - Pinout of Expansion 122. 
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pin sockets. The use of wirewrap techniques on the board 
enabled the system to be put together rapidly and yet to 
provide a high degree of reliability. 

Intel 8212 I/O port chips were selected for the program- 
mer unit because of their versatility and compactness. These 
8 bit ports can be wired to operate in a number of different 
ways since they include both tri-state buffers on the output 
lines and latches on the input lines. An Intel schematic 
for the 8212 chip is provided in Figure 1l. 

The next major design hurdle for the programmer hardware 
was the higher voltage switching circuits. This circuitry 
can be seen in programmer schematic diagram, Figure 7. While 
several of the drive signals to the 8748 chip such as TESTO 
and RESET require 0 and +5 volts for off and on, the program 


functions of EA, V and PROG require 23, 25, and 23 volts 


DD 
respectively as the high input. In fact, EA and V also 


DD 
require a low of +5 volts while PROG must have a low of O0 
volts as well as a "float" condition. The output of the 8212 
chip is easily able to provide a direct 0 to 25 volt transi- 
tion with the assistance, in some cases, of a pull-up resist- 
or. Since no digital chips provide the range of 0 to 25 
volts required for the program function, it was necessary 
to construct separate circuitry using switching transistors. 
The design of all 3 of the 25 volt switching circuits was 
basically the same. A pair of transistors, one PNP 2N3906 


and one NPN 2N3904, were tied together at their collectors 


and driven by a common voltage into their bases. In this 
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configuration, when the 2N3906 PNP transistor has a ground 
‘level at its base, current flows to ground and the transist- 
or is switched on, allowing +25.4 volts at its collector 
output. At the same time a low on the base of the 2N3904 
shuts it off, thereby directly all current into the collector 
output connection. For the reverse condition, when the 3906 
is shut off and the 3904 is turned on, no current is provided 
by the transistor circuitry. Instead, in the case of Урр апа 
EA, 5 volts is provided at the appropriate input pin from 

the +5 volt supply. The emitter of the 3904 is also tied 

to +5 volts to ensure rapid switching from +25.4 to +5 volts. 
while the V5p high operating voltage is set at 25.4 volts 
(allowable range is 24 to 26 volts) the EA high operating 
voltage is 23 volts (allowable range is 21.5 to 24.5 volts). 
Rather than providing two different power supplies, the 23 
volts is reached, for both EA and PROG, by dropping the 

25.4 volts across 3 IN 753A diodes in series. With a Vo (Hs 
.9 volts, the resultant 2.4 volt drop enables the desired 
voltage to be achieved. 

The switching circuitry for the PROG input is necessarily 
somewhat different from the other two because of the require- 
ment for 3 states, namely +23 volts, ground, and floating. 
This is achieved by utilizing two inputs from the TRS-80 
rather than one. One input controls the switching of the 
2N3904 transistor and another controls the 2N3906. When the 


3906 is on and the 3904 is off, 23 volts will be present at 


the output. When the 3906 is off and the 3904 is also off, 
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no current supply or drain will exist and the input may seek 
its own level (about 4 volts under operating conditions). 
when the 3906 is off and the 3904 is on, the PROG input will 
be tied to ground. 

The operating sequence of one complete cycle of the 
system as a whole is illustrated below for one program pulse. 
To assist the reader in following this discussion, the 8 bit 
output of port 4 is listed below. Underneath each bit of 
port 4 is listed the item controlled by that bit. 

V RESET TESTO EA PROGl PROG2 N.C. PORT 1 MD 

Before the 8748 is allowed in the socket of the program- 
mer, the hex code 36, binary 00100100, is output to port 4. 
This provides a +5 volts to PROG2 and +5 volts to TESTO with 
all other port outputs equal to 0. The result is proper 
initial conditions for the 8748 to be inserted in the socket, 
i.e. PROG is floating and. TESTO is high. The next action is 
to output hex 04. This switches TESTO to 0 volts to begin 
the programming process. The next step is to output 20 to 
port 4 which switches EA to +23 volts. The high 2 bits of 
the desired 8748 address are then output to port 2. Port l 
is switched to the latch-on condition next by outputting a 
21 to port 4. The lower 8 bits of the desired address are 
now passed to port 1. An 81 is next output to port 4 which 
turns RESET off with a +5 volts and turns PROG to the 0 volt 
(ground) condition. This latches the address onto the 8748 


bus. The data is then passed out to port 1 followed by a 
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209 to port 4 to raise V Cope Sm volts, а 221 to port 4 


DD 
to raise PROG to +23 volts, and a 50 msec delay to allow 
the programming to occur. PROG is then taken low by out- 
putting 209 to port 4. VDD is then lowered to +5 volts by 


sending an 81 out to port 4. VDD is then lowered to +5 
volts by sending an 81 to port 4. An 84 is next put out 
to place PROG back in a floating condition and set up for 
the verify. The port 1 tristate is also turned off at this 
time by the same step. A 116 is then placed on the bus to 
port 4 to raise TESTO to +5 volts. This action places the 
data at the current 8748 address onto the 8748 output bus 
where it is read into the TRS-80 using the BASIC command 
INP(3) to bring it in via port 3. The software then checks 
for correct programming of that address and outputs a 20 to 
port 4 to lower RESET and TESTO to 0 volts. The cycle then 
begins again with the output of the high address and con- 
tinues until the programmer's last desired address is reached. 
The RPROM routine is basically similar to the above ex- 


cept that no V or PROG pulses are used and no data is out- 


DD 
put to the 8748. Instead, the addresses are put out to the 
chip and the verify procedure follows immediately. A pic- 

ture of the actual timing diagram for this process is avail- 


able as Figure 12. These waveforms correspond favorably 


with the required traces as seen on page 6-8 of Ref. 1. 
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TESTO | | PROGRAM | x 





ADDRESS ADDRESS | DATA 
& DATA VALID | VALID 
+25.4 

Упр 

+5 
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PROG 

0 


+ 


0 20 40 60 80 ШЕГІР 10 100-180 200 
TIME (Milliseconds) 


Figure 12 - Programmer Timing Diagram 
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VI. PROGRAMMER POWER SUPPLIES 


The power for the 8748 programmer is drawn from two 
separate power supplies contained within the programmer 
enclosure. These supplies are not shared with the TRS-80 
power supplies. The right hand circuit board within the en- 
closure was a pre-built supply available from another stu- 
dent's project. It 1S powered by a 26 volt transformer and 
produces 3 separate DC voltages using on-board rectifiers 
and LM 723 voltage regulators. The DC levels available from 
this supply are +5, +12, and -12 volts. Variable resistors 
are available for each supply to allow adjusting of output 
etages by approximately +1 volt. Іп this application only 
the +5 volts is required and it is hard wired to the mother 
board. The +12 and -12 supplies are available for future 
student projects. Іп fact, if а 2708 programmer is con- 
Structed, the +12 volt and a -5 volt supply drawn from the 
-12 volts will be required. 

The other power supply board in the programmer enclosure 
provides a regulated 25.4 volts DC for the EPROM programming 
pulses. This supply was constructed by the author. Figure 
13 is a schematic diagram of the unit which uses an LM-317 
for voltage regulation. 

Current requirements for the 8748 programmer are fairly 
significant for the +5 volt supply. In excess of 500 milli- 


amps is required to power the board. Much of this current is 
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taken up by the 8212 I/O port chips which operate at a higher 
than ambient temperature. The 25.4 volt supply current re- 
quirement is less than 40 milliamps and then only during 
actual programming. 

A schematic is not provided of the mother board since it 
is simply an extension from the TRS-80 expansion interface 
output port. It should be noted, however, that the printed 
circuit lines on the top of the mother board and on the right 
side of the 44 pin sockets represent the bottom row of output 
pins from the expansion interface. Likewise, the top row 
outputs from the interface "A on the bottom of the printed 
circuit board and the left side of the sockets. The 4 out- 
side lines on the mother board are not connected to the TRS-80 
40 pin connector and are intended for use in supplying power 
Erom the programmer power supplies. Additionally, it should 
be noted that all lines from the TRS-80 are connected to only 
the first 44 pin socket. The left most 3 sockets have only 
the data lines, lower 8 address lines, ground, OUT and IN. 
The reason for this is that these signals are the only ones 
required to provide port mode input and output. Thus, they 
will suffice for most applications. 

To provide maximum protection for the programmer cir- 
cuitry, 3 fuses have been installed. A 120 volt, 2 amp fuse 
is located in the input power line to protect against major 
transformer failure. А 750 milliamp fuse is inserted in the 
> volt supply line and a 3/8 amp fuse is in the 25 volt 


programming supply line to protect the programmer board 
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against major damage in the event of overload. 

The light on the front panel of the programmer assembly 
indicates that 120 volts have been received past the 120 
volt fuse. The fuses for the 5 and 25 volt supplies must be 


checked visually if the programmer is not operating correctly. 
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VII. CONCLUSION 


The microprocessor development system discussed in this 
thesis is already in use by several groups of students who 
are employing the 8748 chip in various applications. These 
users have been favorably impressed with the effectiveness 
and simplicity of the system, especially when compared with 
the Tektronix 8002 MDS. While the 8002 has many more capa- 
bilities, its sophistication is at such a high level that 
the beginning student in microprocessors must spend many 
hours learning how to use it. The typical requirements for 
an MDS, to edit, assemble and program EPROMs, are more than 
met by the author's system. 

Perhaps an even more significant difference between the 
TRS-80 based system and the more sophisticated systems is 
cost. The TRS-80 in its present configuration is available 
for about $2000, while the Tektronix system costs over 
$15,000. In fact, the 8748 assembler module alone for the 
8002 is worth $850 with the complete emulator card and probe 
raising that price to over $4,000. 

In constructing the programmer assembly for the 8748, 
additional sockets were provided in a 4 socket mother board. 
These sockets accept the standard 44 pin Vector plugboard. 
It is recommended that future student projects and thesis 
work be directed toward the construction of software and 
hardware to expand this MDS. Some additions which might 


prove useful to 8748 users would be an in-circuit-emulator 
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and a debugger to allow for real time execution of the 
user's program in TRS-80 software. Other possible projects 
could be a programmer for the Intel 2708 and 2716 or other 
commonly used EPROMs. With little additional effort a 
parallel to the already installed capabilities for the 8748 
could be included to provide for the 8080, 2-80, 6800, and 
other popular microprocessors. Since the editor program would 
work for any microprocessor language, the task of program 
building would be limited to only the assembler progran. 
Thus, a new capability for the TRS-80 MDS would consist of 
only a $5 magnetic disk to store the prograns. | 

Other capabilities could be added to the digital labora- 
tory by interfacing the TRS-80 to the Tektronix 8002 to allow 
for exchanging programs and data between the two.  Addition- 
ally, Enc TRS-80 might be used as a real time processor for 
the IBM-360 or other main frame computer, allowing for the 
transfer of programs and data between several computers. 

With the advent of smaller, faster, and more capable 
microprocessors, the age of truly distributed processing 
systems is upon us. Additionally, microprocessor systems of 
the future will be the equivalent in capability of main 
frame computers of the past. For these reasons the import- 
ance of understanding the capabilities and limitations of 
microprocessors and microcomputers cannot be over emphasized. 
The microprocessor development system is one necessary and 


Concrete step toward this goal. To be able to rapidly and 
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effectively program and utilize the microprocessor is the 
raison d'etre of the microprocessor development system and 


is, not coincidentally, the path of the future. 
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APPENDIX A 


PROGRAM LISTING FOR PRINTER SUBROUTINE 
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Location Hex Code Label Opcode Operand 
FFOO ES INIT PUSH HL 
FFOl C5 PUSH BC 
ЕЕ02 F5 PUSH AF 
FF03 3A48FF LD A, (FLAG) 
FFO6 ЕЕОТ СР 01H 
ЕЕО8 2820 JR ZFRESTOR 
FFOA 3E01 LD А, ОН 
FFOC 3248FF LD (FLAG) ,A 
FFOF D3E8 OUT E8,A 
ЕЕ11 DBEY IN АЕЗ 
me 1 3 E6F8 AND OF 8H 
ЕР |15 Ғ604 OR 04H 
ВЕТ 7 324 7ЕЕ 10 (SWTIMG) ,A 
BFFIA D3EA OUT EA,A 
ЕРІС DBE9 BAUDST IN А,Е9 
FFIE E607 AND 07H 
FF20 213FFF LD HL,BDTABL 
FF23 0600 LD B,00H 
БЕ25 4Е 10 СА 
ЕЕ26 09 Арр НЕ BC 
FF27 7E LD A, (HL) 
FF28 D3E9 OUT E9,A 
FF2A Fl RESTOR POP AF 
FF2B er POP BC 
ER2C D POP HL 
FF2D DBEA STATIN IN A , EA 
FF2F CB77 BIT 6,A 
ЕЕЗІ 28ҒА JR Z, STATIN 
ЕР 33 79 LD даа 
FF34 D3EB OUT EB,A 
FF36 FEOD CP ООН 
FF38 2004 JR NZ,RETRN 
FF3A СЗ5ОЕЕ JMP FF50 
FF3D 00 NOP 
FF3E C9 RETRN КЕТ 
FF3F 22 BDTABL DEFB 22H 
FF40 44 DEFB 44H 
FF41 55 DEFB 55H 
FF42 66 DEFB 66H 
FF43 71 DEFB 77H 
FF44 AA DEFB OAAH 
FF45 ЕС DEFB OCCH 
FF46 ЕЕ DEFB ОЕЕН 
FF47 00 SWTIMG DEFB 00H 
FF48 00 FLAG DEFB 00H 
FF49 00 NOP 





FF50 00 NOP 


БЕСІ 00 МОР 

ЕЕ52 00 МОР 

FF53 00 NOP 

FF54 00 NOP 

IE 55 00 NOP 

FF56 00 NOP 

FF57 ES PUSH HL 
FF58 21FF44 LD НІ, 44 
FF5A 2B DEC HL 
FFSB 7C LD A,H 
BESC B5 OR L 
EF5D C254FF JP NZ,FF54 
FF60 Е1 POP HL 
FF6I OEOA LD C,OAH 
FF63 C32DEF JP FF2D 
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APPENDIX B 


FLOWCHART FOR EDITOR PROGRAM 


"EDTASM" 


LOAD PRINTER PROGRAM FROM DISK AND EXECUTE 


RUN "MASTER" 


PRINT "8748 EDITOR/ASSEMBLER ON LINE" 


INPUT "ENTER 





PROGRAM 
3 MODE SELECTION" MES ан с 









RING PREVIOUSLY 
FILED PROGRAM 








PRINT ALL LINES 


IN MEMORY ON 
CR 


PRINT 
ILLEGAL ENTRY 


RUN "ASSEMBLE" 


ФФ 


МО 


y 


NO 


STORE EILE 
NAME ON DISK 
IN STORE” 









Ў 





YES 
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PRINT 


EINE PRINTER 





BRENDA EDIT: eo 


INPUT COMMAND 







MOVE POINTER 
UP ONE 

MOVE POINTER 
DOWN ONE 
DELETE CURRENT 
LINE 










YES SAVE ALL LINES 
IN MEMORY ON 
DISK 


YES 2 





YES 


DAD) 
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LOCATE LINE 
WITH SPECIFIED 
SUBSTRING 






CHANGE OLD 
SUBSTRING TO 
NEW SUBSTRING 


POINTER TO 
ORTOP RILE 


POINTER TO 
ЕШ УОК ЕТТЕ 


PRINT 
"ILLEGAL ENTRY" 
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PRINT "INPUT" 


LINE INPUT 










SAVE ALL 
LINES IN 
MEMORY ON 
DISK 





ADVANCE TO 
NEXT LINE NUMBER 
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APPENDIX C 


FLOW CHART FOR ASSEMBLY PROGRAM 


"ASSEMBLE" 


GET FILE NAME 
FROM "STORE" 


LOAD LINE COUNT 
FROM FILE 


DIMENSION 
VARIABLES 


LOAD FIRST 
LINE FROM DISK 






SET FIRST ADDRESS 
TO OPERAND OF 
"ORIG" 


LOAD NEXT 
LINE 


ET FIRST ADDRES 
O OPERAND OF 
"ORIG" 
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OPCODE 
CONTAIN 
J? 








OPCODE YES 
=JMPP? 








OPCODE 
CONTAIN 
#? 







OPCOD 
CONTAIN 
CALL? 













ADD l to 
PREVIOUS ADDRESS 






ADD 2 TO 
PREVIOUS ADDRESS 





CONVERT 
DECIMAL ADDRESS 


TO HEX 












PRINT LINE NUMBER 
HEX ADDRESS, LABEL 
OPCODE, OPERAND AND 
OMMENTS 







LOOK AT NEXT NO 
LINE 


YES 


PRINT "ЕТЕСТ 
PASS COMPLETED" 
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GET FIRST 
LINE 







DELETE 
ALL COMMENTS 







ASSIGN HEX CODE 
TO OPCODE AND 
OPERAND 







ERROR 
DETECTED? 


NO 
PRINTE HEX 
CODE 







INCREMENT 
ERROR COUNT 
STORE ERROR 
AT LINE NUMBER 






PRINT 


"ASSEMBLY 
OMPLETED" 


PRINT NUMBER 
OF ERRORS 
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NO 






ERRORS=0? 


PRINT ASSEMBLED 
PROGRAM AT 
LINE PRINTER 


ERRORS=0? 


YES 


RUN "MASTER" 


STORE OBJECT 
CODE ON DISK 


UNDER FILENAME 
що 





RUN "PROGRAM" 







NO 











PRINT HEADING 
"LINE ERROR" 
RETURN TO 
LINE 1 


ERROR 
IN THIS 


LINE? 
PRINT LINE 
NUMBER AND 
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GET NEXT LINE 





APPENDIX D 


FLOWCHART FOR "PROGRAM" PROGRAM 









PRINT “ENTER 
PROGRAM MODE" 


2». EXIT TO BASIC MODE 
>. RUN "MASTER" 
RPROM? YES (2) 








PRINT "ILLEGAL 
COMMAND-TRY 
AGAIN" 





PRINT "OBJECT 
CODE ONLY! 

ADD O TO FILE 
NAME " 









CONVERT HEX 
CODE TO DECIMAL 


LOAD OBJECT 
CODE FTEE 


CALL SETUP 
SUBROUTINE 


OUTPUT EIRST 
LINE OF CODE 


TO DESIRED 
ADDRESS 








PRINT "PROGRAMMING 
NO ERROR-ERASE 
EPROM AND TRY 
AGAIN 


CODE OUT 
=CODE IN? 









OUTPUT CODE 
EO CRT 


ADVANCE TO 
NEXT LINE 





YES 


PRINT "PROGRAMMING 
COMPLETED 


SATISFACTORILY" 








PRTNT "REMOVE 
EPROM NOW-THEN 
TURN POWER OFF 







INITIALIZE 
PROGRAMMER 


71 





CALL SETUP 
SUBROUTINE 


READ EPROM 
FIRST DESIRED 
LINE 










DESIRED LINE 


READ NEXT 
LINE 


YES 


RESTORE 
PROGRAMMER TO 
INITIAL 
CONDITIONS 





CONVERT DECIMAL 
NUMBERS TO 
HEX 







PRINT HEX CODE 
IN BLOCK FORM 


PRINT "REMOVE 
EPROM NOW- 
THEN TURN 
POWER OFF" 
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SETUP 
SUBROUTINE 










INPUT "START 
ADDRESS IN 










INPUT "END 
ADDRESS IN 
DECIMAL?" 


NO 











INPUT "EPROM 
SOCKET T EMPTY 
(YES ОК КО)" 








Ф 


YES 









INPUT "IS 
SOCKET POWER 
SWITCH ON? 

(YES OR NO)" 





PRINT "TURN 
POWER ON" 


NO 





PRINT 
"ILLEGAL 
ADDRESS" 


TES 







INPUT "INSERT 
8748 CHIP AND 
ТУРЕ-СО:" 
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APPENDIX E 


8748 EDITOR/ASSEMBLER OPERATING INSTRUCTIONS 


This development system operates under its own set of 


instructions and commands and no knowledge of the TRS-80 


operating system or the BASIC language is presumed or neces- 


sary. 


To load the 8748 program proceed as follows: 
Turn on the master power switch on the bus strip. 


Turn the CRT on by pushing in the button in the upper right 
Бапа corner. 


Turn the expansion interface on by pressing in on the 
button in the center front face of the unit. 


Turn the disk drive on by placing the toggle switch on 
the rear of the drive unit up. 


Insert the 8748 disk in the drive with the notch up and 
the label facing to the right. Close the disk drive 
door. 
Turn the TRS-80 on by pressing in on the button located 
on the rear of the keyboard just to the left of the 3 
input cables. 
The system will now load the disk operating system fol- 
lowed by the BASIC system. The screen will display the 
following: 

HOW MANY FILES? 
Answer this by typing a l and pressing ENTER. 
The next question on the screen will read 

MEMORY SIZE? 
Answer this with 65000 and ENTER. 
The system will then respond with 

RADIO SHACK DISK BASIC VERSION 2.2 


READY 
> 


— 
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Now type in RUN "EDTASM" and press ENTER. 

This loads the 8748 editor/assembler and the screen will 
display 

8748 EDITOR ASSEMBLER ON LINE 
ENTER MODE SELECTIONS- 

The operator is now ready to begin entering and editing 
his 8748 assembly level language program. The following com- 
mands and modes provide all the assistance necessary to pro- 


vide a fully assembled version of his program. 


Modes available: 


INPUT To enter program lines into system 
buffer. 

PRINT Prints contents of buffer on video 
display. 

БРТ1 Prints contents of buffer at the line 
printer. 

EDIT Provides for editing of lines in buffer. 


(See EDIT commands.) 


GET (filename) Transfers (filename) program from disk 
storage into buffer. 


ASM (filename) Assembles program named (filename) and 
provides complete printout at the line 
printer. (ensure that printer 1s con- 


nected to TRS-80 and turned on.) 


Edit Commands: 


UP Moves pointer up one line in the buffer. 

DN Moves pointer down one line in the 
buffer. 

TOF Moves pointer to the top line in the 
buffer. 
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НОЕ 


DEL 


INS 


m /xXxx/ 


7 xxx/yyy/ 
ЕТТЕ (filename) 
PRINT 


INPUT 


Input operations: 


Moves the pointer to the end of the 
flle in buffer. 


Deletes the current line. 


Provides for a new line to be inserted 
above the current line. 


Locates the first line containing 
substring xxx and moves the pointer 
to that line. 


Changes substring xxx to yyy in the 
current line. 


Transfers the contents of buffer to 
disk storage under name (filename). 


Prints contents of the buffer on the 
video display. 


Puts the system in the input mode. 


Enter new program lines in the following format: 


Label 


Tab to 8 by pressing 


Opcode 


Шар to 16. 


Operand 


Шар to 24. 


Comments 


Left justified, 1 to 6 alphanumeric 
characters ending with a colon. 
(Leave blank if no label is desired.) 


+ key. 


3 or 4 letter code from MCS-48 user's 
manual. 


Alphanumerics as given in MCS-48 
user's manual. Numbers must be in 
decimal. 

Locations must be а 1 to 6 digit label 
опту, 


If desired, type a semicolon followed 
Dea Вов description of instruction 
operation. 
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In general 
Press ENTER to move to the next line. 
After the last program line type END as an opcode. 
The opcode ORIG may be used in the first line with a 
decimal number as the operand to direct the 


assembler to place the beginning of the program 
at that address. 


Input Commands: 


QUIT Resets the line pointer to zero and 
returns to the executive routine. 


FILE {filename) Transfers files from the buffer to 
disk storage and returns to the execu- 
tive routine. 


EDIT Transfers to the edit mode to allow 
for program changes and corrections. 


Errors 

There are a number of unlikely but possible errors which 
can be made which would result in the system's dropping out 
of program RUN and back to the BASIC mode. If this occurs, 
in every case the word READY will appear as the last word 
on the CRT. To return to that portion of the program which 
was in operation, simply type RUN and press ENTER.  Un- 
fortunately all files in the system buffer will be lost and 
must be reentered. For this reason it is wise to periodically 
save portions of the new program as they are being written. 


This is done by the command FILE (filename). To continue 


building on this program go to INPUT and continue writing. 
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Linking 

Programs can be written by different authors or the same 
author with the eventual aim of combining into one large 
program for later assembly and execution. To combine two 
programs they must first be written and FILEd on the disk. 
Press the BREAK key and wait for the READY signal. Then 
type APPEND (filename 1) TO (filename 2), after which type 
KILL "(filename 1)". To return to the executive again for 
assembly type RUN. It will now be necessary to edit the 
new program by deleting the END and EOF from the end of 


the first subprogram. 


Programming 
Once the assembly of the user's 8748 program is completed 
with no errors detected, the programmer program will be auto- 


Matically loaded. The following program modes are available: 


STOP Exits the program to BASIC mode. 
EDIT Returns system to editor/assembler. 
RPROM Used to read an 8748 EPROM. 


WPROM (filename0) Writes a program entitled (file- 
name +0) to an 8748 EPROM. (0, 
for object code, must be appended 
to the original filename.) 
Full questions and commands are provided by the program 
to prompt the user during the RPROM and WPROM modes. 


Ensure that the 8748 chip is not inserted or removed 


from the socket except when so directed by the progran. 
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Great caution must also be exercised to make certain the 
chip is not inserted incorrectly as this could result in 


severe damage to the 8748. 


Burn off sequence. (Can be followed any time except when 
disk drive light is on or programmer has 8748 in the 
socket.) 

l. Remove diskette from disk drive. 

ШІ Turn off disk drive. 

3. turn off programmer. 

4. Turn off keyboard/computer. 

5. Turn off CRT and interface. 

6. Turn off master power switch on power bus. 

NOTE: The power transformers (2) in the interface unit 

are not affected by any power switches on the TRS-80.com- 

ponents. For this reason the master power to the plugs 


must be turned off or the transformers will continue to 


Operate. 
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APPENDIX F 


Printer Program - "EDTASM" 


ЩИТ Е ТВ PROG PUTS THE SERIAL PRINTER DRIVER 
INTO MEM LOCATIONS FF£0 - РЕСЕ 
K DCB: +0 => ICE TYPE PRINTER STARTS (8 4025 
=> LRIVER ALDR LSB 
ПСИ ВУЄ ВА В МВ 
> LINES/PAGE 
=> LINE COUNTER 
PO Mime 4220 POKER 6825252 
oo 


2 
5 
4 
POKE 16421,2: 
Eon I 0 TO 
E--256 +I 
REALI Y 

РОКЕ X,Y 

NEXT I 


ЕМІ 
ГАТА 
ТАТА 
ГАТА 
DATA 
ГАТА 
DATA 
ГАТА 
DATA 
DATA 
DATA 


RUN" MASTER" 


КОСО 249 58,72€ 9992954 ,1,40 

e 50902. 2909,211,252,219,253 

нео 26 2,00 ,71,с00,211,234 

FR 52,250,7,23,6029259,6,2,73,3 

— 7. 255,241,195,225,219,254 

E 119,40,250,121,211,255,224 

Ic 495,86,255,00,201,54,68 
арг. 119, 122,284,258,0,98 

00.6 ,0,0, 229,85 ,255 , 8,43 

ШІСІ 194,84,255,225,14,10,196,45,255 
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APPENDIX G 


Editor Program - "MASTER" 


XXX" MASTER жжжж 

^ ---EgXECUTIVE ROUTINE---- 
CLEAR 1900€ 
DEFINT Е-9 
CEFSTR W,X,Y,Z 
DIM X(1008),W(1020) 
CLS И и 
PRINT TAB(15) 8748 ELITOR/ASSEMBLER ON LINE 
PRINT 

140, 

Y= GO 

LINE INPUT "ENTER MOIE SELECTION-- ;Y 
IF Y= LPT1 GOTO 67 

IF Y= ‚INPUT СОТО 52 

IF Y= EDIT GCTO 27 

IF LEFTS(Y, 3)- СЕТ GOTO 83 

IF YO PRINT" GOTO 16 

GOSUB 119 :GOTO 11. 

КО ЕРТ5(Ү,3)<> А5М GOTO 24 
SETS (Y1,5,10) 

OPEN O ,1, STORE” 

PRINT41,2: CLOSE 

RUN ASSEMBLE ' 
PRINT ILLEGAL ENTRY-TRY AGAIN 
COTO 21 

EDIT ROUTINE--- 

PRINT ELIT 

ЦЕЛ 

ВАМІ Х(М) . 

LINE INPUT ; 7 

IF Z<> UP GOTO 34 

Ш И=0 GOTO 29 

M=M-1: GOTO 29 

IP Z<> IN GOTO 36 

M=M+1: GOTO 29 

IF Z= TEL GOTO 113 

IF Z= INS GOTO 104, 

IF LEFTS(Z, 4)=" FILE сое ер 

IF Z<>" INPUT" GOTO 41 
J=J+1:GOTO 53 

IF Z- EDIT GOTO 30 

IF Z4» "PAINT" GOTO 44 

БЕБШЕ 115 ORO. ‚27 

IF LEFTS(Z,1)= L GOTO 91 

IF LEFT$(Z,1)=" G асац 128 
ШК TOF GOTO 48 


ВЕ 





47 M=@: GOTO 25 

48 IF Z<> EOF GOTO 52 

49 M=J: GOTO 29 
50 PRINT ILLEGAL ENTRY-TRY AGAIN 
51 GOTO 29 

нею" ----ІМРОТ ВОСТІМЗ---- 

53 PRINT INPUT 

54 FOR I-J TO 10€2 

55 LINE INPUT NT) 

56 IF X(I)- QUIT GOTO 10 

Ш ІР X(1)<> ELIT GOTO 59 

58 X(I)= EOF : GOTO 27 . 

ETE LEFTS(X(1I),4)<> FILE GOTO 62 
60 Y=MIDS(X(1),6,12): J-I 

61 X(I)= EOF :GOTO 76 

EP J-I 

65 NEXT I. д 
64 PRINT YOU HAVE USEI ALL 2748 MEMORY 
65 ENI 

66 “----- ҺРТ1 ROUTINE----- 

67 ҒОВ 0-0 TO J 

68 LPRINT X(0) 

69 NEXT O 

mo GOTO 11 

71 7----- FILE ROUTINE----- 

ШЕ 1І-М115(27,6,14) 

ШЕ ІР ТЕМ(Ү)<22 GOTO 76 p 

74 PRINT "FILENAME EEQUIREI! 

ШЕ COTO 27 

ШӘ ОВЕК 0,1,1 

77 PRINT#1,J 

78 FOR K-0 TO J 

72 PRINTH1,X(X) 

2g NEXT K: CLOSE 

СОТО 11 

82 “----- GET ROUTINE----- 

83 Z=MID$(Y,5,10) 

84 OPEN I ,1,Z 

85 INPUT#1,J 

86 FOR K-0 TO J 

87 LINE INPUT#1,X(X) 

88 NEXT K: CLOSE 

ШО СОТО 11 

90 ^----LOCATE ROUTINE---- 

B1 FOR K-4 TO 16 m 

MENTE MIDS(Z,X,1)<> / СОТО 106 
03 N=K-4 

НИХ І-МІГ5 (2,4,Н) 

95 FOR M=8 TO J 

Boe L=INSTR(X(M) ,XL) 

ey IF L<>@ GCTO 29 

SE NEXT М | 

S9 PRINT STRING NOT LOCATED : GOTO 29 
100 NEXT K 
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121 
122 
105 
124 
125 
186 
187 
128 
00 
11@ 
№11 
112 
EIS 
114 
115 
116 
117 
118 
119 
120 
Ше 1 
ШЕР 
es 
124 
125 
126 
ше? 
122 
129 
150 
51 
152 
155 
154 
155 
156 
157 
158 
159 
Тай 
141 
142 
145 
144 
145 
146 
147 
148 
149 
150 
151 
152 


PRINT RIGHT HANT DELINEATOR NOT FOUND” 
GOTO 2¢ 

^ ----INSERT ROUTINE---- 

FOR L-M TO 4+1 

и(м)5 0 

W(L+1)=X(L) 

ALWIL) 

NEXT 

J=J+1 ИА 

LINE INPUT :X(M) 

GOTO 29 

^ ----DELETE ROUTINE---- 

FOR L=M TO 7 

X(L)=X(L+1) 

NEXT L 

J=J-1 

GOTO 29 

^ ----PpPRINT ROUTINE---- 

FOR K=@ TO J 

PEINT *(K) 

NEXT K 

RETURN 

ENT 

^ ----TOF ROUTINE=--- 

Мед 

GOTO 29 

^----C8SANGE ROUTINE---- 

FOR K=4 TO 16 М 

IF MIDS(Z,K,1)<> / GOTO 148 
N=X -4 

KOSMIDS(Z,4,N) 

P=K+1 

FOR O=P TO 35 

INT D5(2,0,1)^ / GOTO 145 
Q=0-P 

L=INSTR(X(M),X0) 

ШІ І-0 GOTO 151 

H2=L+N 

L=L-1 

EIEEMIPS(OX(M),1,L) 
X2=MID$(Z,P,Q) 

X3=MILS(X(M) ,A2,58) 
X(M)=X1+X2+X3 

COTO 29 

NEXT 0 5 
PRINT LAST LELINEATOR NOT FOUNT 
nomo 29 

NEXT K. E 
PRINT SECONL LELINEATOR NOT FOUND 
GOTO 29 

PRINT OLD STRING NOT FOUND” 
GOTO 29 
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OONA THANE 


APPENDIX H 


Assembler Program - "ASSEMBLE" 


аа ASSEMBLE exe 
^----ASSEMPLY ROUTINE---- 
CLEAR 10200 
LEFINT H-P 
DEFSTR A,U,V,W,X,Y,Z 
DIM D(120) ,EX$(100), 
ши п1ев),т(1е0),т| 
OPEN I ,1, "STORE 
INPUT41,Y : CLOSE 
OPEN' B Е 
INPUT#1,J 
FOR I=@ TO 7-1 
LINE Eu 
ГЕ INSTR(X(I), ОТО 
B=INSTR(X(I), : ) 
V(I) EMTPS( ADE B-1)) 
ПЕТ І:СІ,05Е 
ІР INSTR(S,X(Z), OR 
EE s, DA 
E Kzü TO J-1 
X(K): E INSTR(T, ")sQ GOTO 23 
Шы PE о 1,Н) 
IF E. T, 2309 GOTO 91 
IF INSTR(8,T, > )«29 GOTO $1 
n INSTR(B8,T, САТ, )<22 GOTO 91 
BK=1 
NONNSTR(B,T, ENE )4C»0 GOTO 31 
D(K+1)=L(K)+BX : E=L(K) : с0508 93 
HXS(K)=A(3)+A(2)+A(1) 
PRINT K+1;TAB(6) HXŠš(K);TAB(12) X(K) 
NEXT K „ 
PRINT FIRST PASS COMPLETEL 
FOR L=8 TO 1-1 
T=X(L):IF Bou бы. GOTO 36 
H=INSTR(X(L), 5 ):T= MIDS(X NACI qe. E) 
IF INSTR(8,T, "CLR 2<20 6070 201 
IF INSTR(E,T, "MOV, )<>@ GOTO 316 
IF INSTR(S,T, IN )<>@ GOTO 253 
IF INSTR(B,T,' “ORL )<>@ GOTO 378 
IF INSTR(8,T, OUTL )<>£ GOTO 425 
IF INSTR(8,T, „ALL, ОТО 116 
DESUNSTR(8,T,, OL GOTO 415 
шеста (а,т, AL, 308 GOTO 420 
IF INSTR(8,T,' ВВ )<>0 GOTO 426 
IF INSTR(8,T, "ICH )<>@ GOTO 446 
IF INSTR(8,T,' "DINZ )<>@ GOTO 232 


‚T 
Х (180) 
180) ,2 (188) 


IC) =0 766704 28 
):E(8)=VAL(W(2))- 
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47 
48 
45 
56 
51 
52 
B 
94 
55 
56 
57 
53 
EO 
60 
ei 
De 
63 
64 
09 


66 


67 
63 
бе 
70 
al 
72 
73 
74 
75 
76 
77 
78 
79 
ве 
81 
82 
83 
84 
85 
86 
87 
88 
89 
20 
91 
c2 
93 
94 
95 
96 
с? 
98 


IF INSTR(8,T, JC )<>@ GOTO 279 
IF INSTR(8, т, ‘JF )<>@ GOTO 282 
IF INSTR(&,T, JMP )<>@ GOTO 289 
IF INSTR(B,T,' JN ое GOTO 296 
IF INSTR(S,T, CPL )<>2 GOTO 210 
IF INSTR(E,T, MOVI )<>2 GOTO 357 
IF INSTR(8, т, 'МОЎР. 300 СОТО 365 
IF INSTR(S, то 'MOVX 2507 (270 570 
ІР INSTR(8,T, -ҮВ )<>@ GOTO 271 
IF INSTR(8,T, ТІС КОО СОТО 118 
IF INSTR(8,T, JT )<>0 GOTO 307 
IF INSTR(8,T, JZ )<>€ GOTO 314 
IF INSTR(8,T, “МОР )=@ GOTO 61 
Z(L)s' 0€ :GOTO 146 

ТЕ INSTR(S, т, DA )=€ GOTO 63 
HEN 57? : GOTO 148 
BUNPNSTR(S,T, ВЕС )<>0 GOTO 219 . 
IF INSTR(8, T. "STOP )=6 OR INSTR(13,T, TCNT )=@ GOTO 56 
Z(L)= 65 :GOTO 140 . on 
IF INSTR(8,T, SWAP )=€ OR INSTR(13,T, A )=0 GOTO 68 
Z(L)= 47 :GOTO 140 
NEEENSTR(B,T, INC )<>@ GOTO 259 
fae INSTR(8,T, SEL, 200707422 
IF INSTR(E, T, "АМ, )<>@ 6070 149 
IF INSTR(S, а ШАГ )<>@ GCTO 183 
IF INSTR(8,T, POI )<>@ GOTO 441 
IF INSTR(8,T, INS “)=0 GOTO 75 
ШІ)- OB : 2970. 140 

IF INSTR(8,T, EN )<>@ GOTO 244 
IF INSTR(8,T, "XRLO )<>0 СОТО 458 
IF INSTR(8,T, DIS )<>8 GOTO 227 
IF INSTR(8,T,' "ORIG )<>@ GOTO 20 
pomo 125 

NEXT L 

PRINT ASSEMBLY COMPLETEL 

PRINT ERS; ERRORS 

IP ERS=9 GOTO 473 

PRINT LINE ERROR” 

FOR I=@ TO J 

IF LEN(U(I))=@ GOTO 88 

PRINT (I+1);TAB(S) U(I) 

NEXT I 

Sono 473 

ЕМІ | p 

IF INSTR(8,T, JMPP )<>@ GOTO 26 
ESO: GOTO 27 

І1-ҒІХ(Е/16) 

Е(1)-Е-(16%11) 

І2-ҰІХ(11/16) 

F(2)2I1-(16*I2) 

ЗЕЯ. 

F(3)2I2-(16*I3) 

FOR E | TO 3 


ся IF F(N)=0 TEEN A(N)= 0° 
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101 
102 
105 
124 
125 
186 
107 
108 
109 
110 
111 
12% 
115 
114 
115 
116 
117 
118 
119 
129 
№21 
122 
125 
124 
MES X 
126 
127 
128 
1/22 
152 
151 
152 
135 
154 
158 
156 
157 
158 
159 
148 
141 
142 
145 
144 
145 
146 
147 
148 
149 
150 
151 
ESE 
153 
154 


IF 
IF 
IF 
IF 
IF 
IF 
IF 
IF 
IF 
IF 
IF 
IF 
IF 
IF 


TEEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
© THEN 
11 THEN 
-12 THEN 
-13 THEN 
-14 THEN 


POONA UO > Q он 


H n Wu H H H й H H Hl H 


р» р» р» р> рь рь р> р> р» 


;: : š хоо Ол с оҥ. 


l # H H ll dH 


= 
* 


нііш нда нні "xj haj baj raj нд ін кд hy 
Ж: а ж. ап xL at =Z = quom qu > 


үл H. мы чч? мы чыгы чыч „чы е masa 
[E 
— — — — — — Z = = = => = = = = 


= > =Z = = = — — ur u — u u — 
= u. u. е Н НН u Wu 


6 
(М 
( 
( 
| 
( 
( 
( 
( 
( 
( 
( 
( 
( 


кє] 3 Cj C2 t3 D 


IF =15 THEN 
NEXT N : RETURN. | 
^--FOR "ADD' & "ANL -- 
Чар: GOTO 120 
Q-9 
ESINSTR(8,T, , ) 
IF 5-0 GOTO 125 
ИТЕ (В.Т, „В 
IF INSTR(8,T, ^,C. 
IF NUSTR(R.T, ,4 
ES-ERS+1 : U(L)= 
MIDS(T,(E+2),2) 
E=VAL(W) 
255 GOTO 131 
ERS=ERS+1 
NE TATA EXCEEDS BYTE SIZE. M. ва 
ТҮ 0-0 ТНЕМ Ү(І,)- 03 ELSE Y(L)= 
GOTO 138 
W=MILS(T,(B+2),1) 
IF VAL(W)48 GOTO 137 
ERS=ERS+1 , 
U(L)= REGISTER SIZE EXCEEIS 7 :GOTO 80 
IF Q=@ THEN E=184 +VAL(W) ELSE E=128+VAL(W) 
GOSUB 23 
Z(L)2A(2) A (1) 
» TOES THEN PRINT Y(L)+Z(L) ELSE PRINT 
GOTO 89 
ENT 
W=MILDS(T,(B+23),1) 
IF Bou e GOTO 147 
ERS=ERS+1 | 
U(L)= R EXCEEDS 1 :G0TO 88 
IF Q=@ THEN E=S6+VAL(W) ELSE E=112+VAL(W) 
GOTO 138 : END 
IF INSTR(8,T, p. 
BSINSTE(8,T," С 
IF INSTR(B,T, ,R )=@ GOTO 155 
W=MIDS(T,(B+2), 1) : ESVAL(W) 
ТЕ Е>7 СОТО 135 
E=88+E : GOTO 138 


У) 0 GOTO 133 
38 GOTO 143 
)O 9 GOTO 126 


SYNTAX ERROR : GOTO 86 


Z(L) 


“Узе GOTO 163 
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N55 
196 
Ша? 
158 
Mao 
169 
161 
162 
165 
164 
155 
166 
Ше? 
Eco 
Ше 
170 
171 
Bre 
175 
174 
1275 
176 
ше? 
175 
179 
160 
BEI 
е2 
18° 
184 
125 
186 
18? 
eS 
Шар 
190 
hed 
o 2 
193 
194 
195 
E96 
297 
198 
199 
200 
201 
202 
203 
204 
205 
206 
20% 
208 


IF INSTR(B,T, ,@ )-0 GOTO 159 
W=MIDS(T,(B+3),1) 

IF VAL(W)>1 GOTO 145 
T=80+VAL(W) DOT MS 


IF ЕСІ? GOTO 164 
W=MIDS (T,(B+2),3) : E=VAL(W) 
IF E>255 GOTO 129 

Y(1)="53" : GOTO 138 
E=INSTR(&,T, , ) 
IF INSTR(8, IS =D COTO 168 
М-МІГ5(Т ‚(B+2), 3) : E=VAL(W) 
IF 12555. GOTO 129 


ЩЕ! - OO LOS 
IF INSTR (8. T; Li Л) 00) 25 
ІР ЕСІ; T, # )=@ GOTO 178 


W=MIDS(T (B- LM Ж 
ІР B: ANT шака ура GOTO 174 
ERS=ERS+1 " 
U(L)= INCORRECT PORT # :GOTO 82 
E=152+VAL(W) : COSUB 93 
Y(L)=4(2)+4(1) 
W=MIDS(T,(B+2),3) : E=VAL(W) 
IF E>255 p 126 „ELSE GOTO 138 A 
IF E T, ANLD )-б0 ОН ІМ5ТЕ(8,7, ,Һ 3-2 СОТО 125 
ШЕИ 5 (Т, m 1),1) : E=VAL(W)-4 
IF Е<О OR ша ро 172 
E=156+E : GOTO 138 
^-- CALL -- 
GOSUE 189 
Eu мирен. 
mem =STRS(C 4” 
ІШ = E. f ),2) 
СОТО 140 
^--ALLRESS SUBROUTINE-- 
IF INSTR(18,T, 5 )=0 GOTO 191 
B=INSTR(18,T," ):W=MID$(T,17,(B-17)):GOTO 192 
Y=MII3(7,17,8) 
FOR M=£ TO J-1 
IF W=V(M) GOTO 197 
NEXT M 
ERS=ERS+1 X ч 
U(L)="LABEL- +W+"-NOT FOUND : GOTO 80 
E=D(M) : GOSUB 93 
Z(L)=A(2)+A (1) 
RETURN 
^--"CLR'-- 
IBNESNSTR(15,T, "A )-0 сото 203 
AL)= 27 : GOTO 148 
IF INSTR(13,T, C )=& GOTO 205 
Z(L)= 57 : СОТО 140 
IF INSTR(13,T, Fi )=8 GOTO 227 
Z(L)= A5 : GOTO 14€ 
BOINSTR(13,T, #78 )-0 GOTO 125 
mij= 85 : GOTO 14€ 
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209 
hI 
ЕТІ 
ке 
215 
214 
215 
Е 6 
217 
218 
219 
220 
221 
222 
аа 
204 
AS 
Е26 
се"? 
228 
229 
230 
231 
252 
235 
254 
255 
256 
257 
258 
259 
240 
241 
242 
243 
244 
245 
246 
247 
248 
249 
250 
ESI 
ES 
295 
254 
23D 
256 
Zo? 
258 
ESO 
269 
261 
262 


-- "СР. -- 
Шота (18, т, ")=0 GOTO 212 

Ш)- v : 2040. 148 
% ШЕН 15,1, КЕГІ 500 212 
Z(L)= A? : GOTO 149 
IF INSTR(13,T, FO )-0 GOTO 216 
Z(L)= 95 : GOTO 140 
IF INSTR(13,T, F1 )-9 СОТО 125 
КО 35 : GOTO 140 
^--[EC-- MM 
IF INSTR(13,T, A )=@ GOTO 221 
Z(L)= 07 : GOTO 140 
IF INSTR(13,T, R )=@ GOTO 125 
EINSTR(13,T, R ) 
W=MILS(T,(B+1) 1) ES UAM) 
ШЕ (>? СОТО 135 
Е-Ез200 : GOTO 138 

7--І15-- e 
IF INSTR(13,T, I )=@ GOTO 229 
2(1)= 15 : GOTO 140. 
IF INSTR(13,T, TCNTI )=@ GOTO 125 
2(1)- 35" : GOTO 140 

^--IJNZ-- 
B=INSTR(13,T, , ) 
W-MIDIS(T, s M, 11) : ESVAL(W) 
МРТ GOTO 135 
E=E+232 : GOSUB 93 
Y(L)=4(2)+4 (1) 
W-MIDS(T,(E*1),8) 
FOR M=@ TO J-1 
IF W=V(M) GOTO 242 
NEXT M 
EOTO 195 
Е=Г (М) :60508 95:2(L)2A(2)*A(1):GOTO 142€ 
^-—-EN-- 
IF INSTR(13,T, ТСМТІ”)-0 GOTO 246 
Nn 25 : GOTO 140 
NNEINSTR(13,T, I’ )=0 GOTO 248 
Z(L)="05" : GOTO 140 
ESEINSTR(15,T, ‘CLK )=@ GOTO 252 
Z(L)s 75  : GOTO 140 
IF INSTR(8,T, END )=@ GOTO 125 
GOTO 81 

"--IN-- | 
IF INSTR(13,T, A,P )=@ GOTO 125 
B=INSTR(13,T, P 
W=MIDS(T,(B+1),1) : E=VAL(W) 
ШИ» GOTO 172 
B=E+6 : GOTO 138 

^--INC-- 
UNS TR(1S,T, № )=0 GOTO 261 
Щи Е 17: 2976 146 
EZENSTR(13,1, A). 
IF INSTR(13, т, ' R”)=@ GOTO 266 
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263 
264 
ZOO 
266 
267 
268 
EO? 
270 
271 
Em 
Em 
274 
гаў Э 
Его 
Е? 
278 
279 
230 
zei 
Boe 
zes 
284 
ESO 
286 
287 
ген 
289 
сей 
291 
292 
EO 
eo 
295 
296 
ЕЕ? 
298 
269 
500 
501 
502 
505 
504 
505 
5@6 
507 
508 
509 
510 
ЕТІ 
EL 
315 
514 
EIS 
516 


W=MIIS(T,(B+1),1) : E=VAL(W) 

IF 527 GOTO 135 

E=E+24 : GOTO 138 
MINS TR (13.17, GR )= GOTO 125 
W-MIDS(T,(B*1),1) 
ESVAL(W) : IF E>1 GOTO 145 
E=E+16 : GOTO 138 

оо ee 4% 
В-ІМ5ТЕ(8,Т, В) 
W=MIDS(T,(B+1),1) : E=VAL(W) 

IF E<8 GOTO 275 . 4 
ERS=ERS+1 : U(L)= BIT > 7 
E=18+(E*32) : GOSUB 93 
Ү(І,)-А(2)-А(1) 
GOSUB 189 : GOTO 148 

вис. 
в) = #6 
GOSUB 189:G0TO 142 

^--Jr-- 

IF INSTR(8,T, 070 ")-є ССТО 285 
ШІЕ)- Вб 
GOSUB 189:20Т0 140. 
MeeENSTR(8,T, JF1 )=@ GOTO 125 
Y(L)= 76 
GOSUB 189:G0T0 148 

'-- JMP-- 

IF INSTR(8, Т, JMPP )=@ GOTO 291 
Z(L)- B3 :GOTO 140. 

IF INSTR(8,T, JMP )-2 GOTO 125 
GOSUPR 18€ 

E-VAL(A(3))*2:GOSUB 93 
(1) + 4 :GOTO 149 

7..1 N-- 

IF INSTR(8,T, JNC “)=@ GOTO 298 
I(L)- ES :GOSUB 189:GOTO 140 

IF INSTR(8, T, JNI )=@ GOTO 309 
Y(L)= 86 :GOSUB 189:G0TO 140 

IF INSTR(8,T, "INT@ )=@ GOTO 3@2 
Y(L)= 26 :GOSUB 189:60Т0 140 

ТЕ INSTR(8, 7, JNT1 )=@ GOTO 304 
ШІ )- 46 :GOSUB 189:G0T0 140 

IF INSTR(8, ШОО )=8 GOTO 125 
Y(L)= 96" :GOSUB 189:GOTO 140 
7..11-- 

IF INSTR(8, т, JTF )=@ 6070 309 
Е 16 :GOSUB 18€:G0TO 140 
чт, т, 270 ,)-0 GOTO 311 
Y(L)="36' :GOSUE 189:GOTO 140 

IF INSTR(8, пша ECO TO 125 
Y(L ШЕ 56 :GOSUB 189:G0T70 149 

= D 
Y(L)="C6 :C0SUB 189:GOTO 140 

* --MCY-- n 

цэсу» т.н )-0 GOTO 342 
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517 
318 
ЕО 
520 
Ecl 
E22 
523 
524 
Beo 
526 
527 
528 
529 
550 
351 
552 
359 
334 
355 
536 
357 
558 
559 
340 
541 
342 
345 
344 
545 
546 
547 
548 
349 
550 
Sol 
EZ 
355 
554 
859 
556 
557 
558 
559 
560 
561 
562 
565 
564 
565 
566 
567 
568 
569 
5%0 


B=INSTR(13,T, R”) 
W=MILS(T,( (B+1),1): E=VAL(W) 

IF INSTR(13, т, АЕ )=0 COTO 322 
IF F>? GOTO 135 
E=E+248:G0T0 138 p 
NEEINSTR(TS,T. A,GR )=@ GOTO 225 
ШІ Н>! С0Т0 146 
E-E*240:GO0TO 138 | E 
IF INSTR(13,T, ,A,.)<>@ AND INSTR(13,T, @R )<>@ GOTO 329 
NESINSTR(13,T, ‚А )=@ GOTO 331 
ШЕ? GOTO 135 
E=E+168:GOTO 138 

ШЕ 1 СОТО 146 

E-E*160:GO0TO 138 

BSEUNSTR(1S,T, yt )=8 GOTO 125 
I? INSTR(13,T, GR )-0 GOTO 340 
ІР E>»1 GOTO 146 
%=5+176 
GOSUB 93 
Y(L)=ı(2)+4(1) 
WsMIDS(T,(B*4^),3) :E-VAL(W) 

ШІ Е>255 COTO 129 
GOTO 138 

НЕО? СОТО 135 
2=8+184:С0Т0 335 

IF INSTR(13,T, A,# )=2 GOTO 348 
3=INSTR(13, T, E 

шар) E 
BEMTDS(T,(Bt*2),2) : E-VAL(W) 
IF E»255 “GOTO .129 
GOTO 138 

IF INSTR(13,T, 4,PSW )=@ GOTO 359 
7 (1)= С? ¿GOTO 140 
IF INSTR(13,T, A,T )-Z GOTO 352 
2(1)+ 42 1010. 140 й 
MINS TRAS, PSW,A )=@ GOTO 354 
= D7 
IF INSTR(13,T, T,4")-0 GOTO 125 
Z(L)=" 62 :GOTO 140 

^--MOVI-- і 
B=INSTR(13,T, P ) 
W=MILS(T (541) ,1) :E=VAL(W)-4 
IF E< M E>3 GOTO 172 
NNENSTR(T13,T, А,Р )-0 С0Т0 362 
E-12-E:GOTO 138 . 
INENSTR(13.,T, ,À )s8 GOTO 125 
E=E+6@:GOTO 138 

’--MOVP-- p р 

IF INSTR(8,T, MOVP )=@ GOTO 367 
Z(L)= AS. :GOTO 149 ` 

IF INSTR(8,T, MOVP3'")-0 СОТО 125 
О) = ҰЗ :GOTO 140 

*--MOVX-- | 
BEINSTAR(13,T, R”) 
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671 
Erz 
Е7 5 
374 
575 
376 
52" 
578 
oro 
580 
581 
382 
385 
584 
385 
586 
987 
388 
589 
550 
991 
582 
393 
E94 
555 
326 
БЕ? 
598 
999 
400 
401 
462 
405 
464 
405 
4026 
407 
408 
409 
410 
411 
412 
415 
414 
415 
416 
417 
418 
415 
420 
421 
422 
425 
424 


W=MILS(T,(B+1) ,1) :E=VAL(W) 
IF E>1 GOTO 145 р 
TE INSTR(13,T, A,OR )=8 COTO 375 
E=128+E:GOTO 138 | 
IF INSTR(13,T, ,A )=0 GOTO 125 
E=144+E:GOTO 138 
’--ORL-- 
B=INSTR(13,T, 7). 
IF INSTR(13, Т A Уза GOTO 382 
W-MIDS(T,(R*2),3):E-VAL(W) 
IF E»255 GOTO 129 
GOSUB $3 
Z(L)-A(2)*A (1). 
IF INSTALAS, T, A, )=@ GOTO 386 
ШЕ 43 :GOTO, 140 К 
та (13,7, "BUS, )=2 GOTO 388 
Y(L)= 88 :GOTO. 140 
fet NSTA(13,T, P )s6.GOTO 125 
W=MIDS(T,(B- 1), 1):E=VAL(W) 
NUN CI OR E»2 GOTO 172 
E=E+136:GOSUB 93:Y(L)=A(2)+A(1):GOTO 140 
IF INSTR(8,T, ORLI )-й СОТО 396 
W=MIDS(T, ШІ 1):E=VAL(W)-4 
IF E<8 OR E>3 GOTO 172 
B=5+14@:GOSUB 93:Y¥(L)=A(2)+A(1):GOTO 140 
IF INSTR(13,T, A,R )=2 GOTO 420 
W=MILS(T,(E+2),1):E=VAL(W) 
Me E>? GOTO 135 | 
E=E+72 : GOTO 138 . 
IF E. ПОЛОВЕ) =0 GOTO 125 
W=MIIS(T (B+3),1): E=VAL(W) 
IF Е>1 E 145 
E=E+64 : GOTO 138 
^ --QUTL-- 
IF INSTR(13,T, “В05,А )-0 GOTO 407 
ПОТ )= 22 :GOTO 140 
If INSTR(13,T, ‚A )=@ GOTO 125 
IF INSTR(12,T, Р@,А ESTE TO 415 
БЕЙ 5ТЕ(15,7, ,) 
ШМЕМІПГ5(Т, бро -1),1):E-VAL(W) 
IF E»2 OR E<1 GOTO 172 
E=E+56:GQTO 138 
2(1)= 99 :GOTO 140 
^--RET-- 
IF INSTR(8, Т, RETR )=@ GOTO 417 
HEN c3 :GOTO 148 
IF INSTR(8,T, RET )=0 СОТО 125 
Z(L)- '&z" :C0TO 14g 
^-—-RL-- 
IF INSTR(13,T," A )-0 GOTO 125 
IF INSTR(8, T, E аса рана аа 
ШЕ r7 :GOTO 142 
IF INSTR(8,T, RL )=@ GOTO 125 
А) = E? :GOTO 140 
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425 
426 
427 
428 
429 
450 
451 
452 
455 
454 
455 
456 
457 
458 
459 
440 
441 
442 
445 
444 
445 
445 
447 
448 
446 
420 
451 
452 
455 
454 
455 
456 
45? 
458 
459 
460 
461 
462 
465 
464 
465 
466 
467 
468 
469 
47 9 
471 
472 
475 
47 4 
475 


“-—RR-- 
IF INSTR(12 EN A )=@ GOTO 125 
IF INSTR(8,T, RRC )=@ GOTO 429 
2(L)= 67 :GOTO „149 
ТЕ ET ")=@ GOTO 125 
mL )= 7 6070 aoe 
E ' 
IF INSTR(12,T, MBE )=0 GOTO 434 
Ще “ES GOTO, 142, 
IF INSTR(12, T, MB1 )2sQ GOTC 436 
Z(L)s #5 ¿SOTO 142, 
IF INSTR(12, T,"RBO )-0 GOTO 438 
И C5 :GOTO, 140. 
EEINSTR(12,T, “ЕВ1 )-0 GOTO 125 
Z(L)= ШЕ. :GOTO 140 
^--STRT-- 
IF INSTR(13,T, CNT )=@ GOTO 443 
2(1)- 45 :СОТО 140 
n INSTR(13,T, T )=@ GOTO 125 
Z(L)=` 55”:G0T0 140 
^--XCH-- np" 
БЕ ШН5ТЕ(12,7, ) 
Я-МІГ5(Т, (B+1), 13); ESVAL(W) | . 
IF INSTR(8, T CHE О ОЕ ENS TRE. TA ER )=08 GOTO 451 
IF E>1 GOTO 145 
3=E+48:GOTO 138 
ШЕ /ТК5ТВЕ(12,7, А,Е )= GOTO 454 
ВЕ >? GOTO 135 
E=E+409 :GOTO 158 . 
NUNDUNSTR(12,T, А, СЕ )-0 СОТО 125 
NUES ^1 GOTO 145 
E=E+32:60T0 138 
'^--XRL-- 
E at T RY 
W=MIDS(T, (B+1), 1) :E-VA L(K) 
IF INSTR(12, A RDA COTO 263 
IF ED? GOTO 135 
E-E*216:G0TO 138 
IF INSTR(12,T, A,@K )=@ GOTO 466 
IF I GOTO 145 
E+208:G0T0 138 
Er NUSTR(12,T, A,# )=@ GOTO 125 
B=INSTR(12, T, * 
W-MILS(T, (8-1), 3):E=VAL(W) 
IF Е>255 GOTO 129 
ШЕ rS :GOTO 138 
END 
LINE PRINT LISTING-- 222 ВВ. I 
LPRINT :ІРВІМТ ASSEMBLY OF “+ “ ;Y;” + COMPLETED 
LPRINT © EM. . й | | р 
LPRINT ‘LINE + “а HEX"+ “+ CODE + “+ FABL + 


E OPCOLE + “+ OPERANT +. "+" COMMENTS” 


476 
477 


FOR N=@ TO J-1 
LPRINT N+1;TAE(6) HXS(N)3TAB(12) Y(N)+Z(N)3TAB(19) X(N) 
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478 
479 
480 
481 
482 
485 
484 
485 
486 
487 
488 
489 
490 
po 
492 
495 
494 
495 
496 
497 
498 
499 
500 


IF LEN(U(N) )<>@ LPRINT U(N) 

NEXT N 

LPRINT ` „ 

LPRINT SYMBOL TAELE: 

LPRINT 

FOR M=8 TO J p | 

IF LEN(V(M))<>@ LPRINT V(M)3 --- +8xX$(™) 

NEXT M 

IF ERS<>@ GOTO 496 

LPRINT | | 

ІРВІМТ ТАВ(20) >>> NO ASSEMELY ERRORS LETECTED <<< 

GOTO 492. Й _ 

LPRINT :LPRINT ERS; ERRORS ГЕТЕСТЕГ 

RUN MASTER 

Y=1+ 0 ` 

CPEN 0 ,1,Ї 

NOR M=2 TO J 

IF LEN(Y(M)) 
M 
) 


, 


:UNGOTO 497 
PRINT #1,Y(M) 
PRINT41,Z(M 
NEXT M 

CLOSE 


RUN "PROGRAM" 


$5 





(O (D — O: Q; ак» 


eo 
e Q 


НН нь нь нь нь нь 
Оо У о Cn i CA № 


грее 
OM Сл М © tO 


ГӘ ГӘ го го 
Ооо Уо 


H> > i> i> Q) OQ Q OQ QQ Q (q Q) Q OQ: 
сз Ñ = Ыы (O OO -2 O! i> сак б 


poe 
O (n > 


APPENDIX I 


Programming Program - "PROGRAM" 


"xk PROGRAM x 

^----EPROM ROUTINE---- 

CLEAR 10000 

LEFINT A,1,3,K,M,N,0,0,P 

DEFSTR W,X,Y,Z 

DIM T(1024),T (1024),X(1224) 

C= 

LINE INPUT ENTER PROGRAM MOLE-- 3Y 
IF Y= STOP ЕМГ 


IF Y= ELIT ”' RUN ELTASM 

IF Y= RPROM GOTO Se, 
ШЕПЕЗТ5(Ү,5)- WPROM GOTO 16 ` 
PRINT ILLEGAL COMMANL-TRY AGAIN 
GOTO 8 

^-—--WPROM ROUTINE--- 

Ав (Х,7,11) |. 

IF RIGHT$(Z,1)= 0 6070 26 | 
PRINT OBJECT CODE ONLY! ALD O TO FILS NAME 
GOTO 6 | 

ween I ‚1,2 

FOR I=@ TO 1024 

BEUT #1,X(1) 

IF EOF(1) THEN 25 

NEXT I 

COSE . J=I 

GOSUB 65 

GOSUB 148 

OUT 4,4 

OUT 4,20 

FOR M=1 TO Q 

for 2,N1 

@ Т 4,21 

ШИП 1,11 

OUT 4,81 

OUT 1,D(M) 

OUT 4,299 

OUT 4,221 

GOSUR 58 

OUT 4,209 

OUT 4,81 

OUT 4,84 

OUT 4,116 

T(M)=INP(3) 

OUT 4 ге 

11=11+1 

IF 11<>25€ CR 11<>512 OR 11<>768 GOTO 48 
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47 
46 
49 
50 
Bi 
22 
55 
54 
35 
56 
2 
58 
39 
69 
61 
62 
65 
64 
65 
66 
E 
68 
69 
72 
1 
Ec 
TS 
74 
e 
26 
[o7 
78 
7S 
80 
81 
az 
65 
84 
ES 
86 
87 
58 
BS 
29 
Эа 
92 
53 
94 
EO 
56 
ET 
98 
99 


М1-М1%1 

IF T(M)=T(M) GOTO 51 , 
PRINT “PROGRAMMING ERROR-ERASZ ZPROM AND TRY AGAIN 
GOTO 53 

NEXT M | 
PRINT PROGRAMMING COMPLETED SATISFACTORILY’ 
OUT 4,36 4 
PRINT "REMOVE ZPROM NOW-THEN TURN POWER OFF 
сото 8 

ENL 

*---56 МЗЕС ГЕТАТ--- 

А=А+1 

“TELAY 

IF A<2 GOTO 58 

A-Q 

RETURN 

END 

'---HEX TO LEC CONVERSION--- 

FOR K=@ TO J 

W(2)=LEFTS(X(X),1) : W(1)=MIT>?9(X(X),2,1) 
FOR N=@ TO 1 


IF W(N)= 2, A(N)=@ 
IF W(N)= 1  A(N)=1 
IF W(nN)= 2, A(N)=2 
IF W(N)= 3, A(N)=3 
IF W(N)= 4, A(N)=4 
IF W(N)= 5, A(N)=5 
IF W(N)= 6) A(N)=6 
IF W(N)= 7, A(N)=7 
IF W(N)= 8, A(N)=8 
IF W(N)= S, A(N)=9 
IF W(nN)= A, A(N)=10 
IF W(N)= E, A(N)=11 
IF W(N)= C, A(N)=12 
ІР Ҹ(№)= Г A(N)=13 
IF W(N)= E  A(N)=14 
IF W(N)= F A(N)=15 
ІР LEN(W(N))=0 A(N)=0 
NEXT N 
D(X)=1€6*A(0)+A(1) 
NEXT K 

RETURN 

^---READ PROM ROUTINE--- 
GOSUE 148 

OUT 4,4 

OUT 4,29 

FOR M=1 TO (Q+1) 
OUT 2,М1 

OUT 4,21 

Gur 1,11 

OUT 4,85 

OUT 4,84 

OUT 4,116 


120 T(M)=INP(3) 
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121 
122 
185 
164 
185 
106 
107 
108 
129 
119 
1 
Pl 
115 
114 
115 
в! Є 
Bi" 
118 
ше 
128 
121 
122 
125 
124 
125 
NO 
ша? 
128 
129 
130 
131 
152 
135 
154 
155 
156 
1357 
128 
139 
140 


"-X( 


OUT 4,84 
QUT 4,20 

11=11+1 

Ши 1 < 256 GOTO 107 
11211-256 

N1=N1+1 

NEXT M 

wom 4,36 

ШІН М-1 TO 6-1 
E=T(N) 
N1=FIX(E/15) 
F(1)=E-(16*N1) 
N2=FIX(N1/16) 
F(2)=N1-(16*N2) 
ЦО-ЕТИ (Мм2/16) 
F(3)=N2-(16*N3) 
HOR P=1 TO 2 


IF Е(Р)-0 ТВЕН Ұ(Р)- 0. 

IF F(P)-1 ТНЕМ W(P)= 1, 

IF F(P)=2 TEEN W(P)= 2, 

IF F(P)=3 TEEN W(P)= 3, 

IF F(P)=4 THEN #(Р)- 4. 

IF F(P)=5 THEN W(P)= 5, 

IF F(P)=6 THEN W(P)= 5. 

IF F(P)=7 TEEN W(P)= 7. 

IF F(P)=8 THEN W(P)= 8 

IF F(P)=02 THEN W(P)= 9 

IF F(P)-10 THEN W(P)= A, 

IF F(P)=11 THEN W(P)= В. 

IF F(P)-12 THEN Ұ(Р)= С. 

IF F(P)=13 TEEN W(P)= L, 

IF F(P)=14 TEEN W(P)= E, 

IF F(P)=15 TEEN W(P)= F 

NEXT P 

X(N)=W(2)+W(1) 

NEXT N 

GOSUB 139 

GOTO 53 

Um 1 те oe [1] oe ? f oe 
PRINT IX;TAB(6) X(Q)+ +Х(0+1)+ +X(Q+Z)+ +X(0+3)+ 
0+4)+" "+Х(0+5)+” “+х(о+є)+” "+x(0+7)+ +Х (с+8) + 


"*X(0«9)«" "«X(0*10)*" "+Х(0+11)+” "+Х(0+12)+” "+Х(0+13)+” 
+X(0+14)+" +X(0+15) 


141 
142 
145 
144 
145 
146 
147 
148 
149 
150 
LI 


0=0+16 

IF 020+1 СОТО 144 
IX=IX+16 : GOTO 14€ 
PRINT 

RETURN 

ENL 

“---SETUP ROUTINE=-- 
ме | 

PRINT START ADDRESS IN DECIMAL?” 
INPUT 11 

Прі 1024 СОТО 152 
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152 
155 
154 
155 
E56 
157 
59 
159 
166 
161 
162 
165 
164 
аја 
166 
ше” 
168 
Do 
17% 
171 
12 
175 
174 
Его 
176 
AGC 


PRINT "ILLEGAL ALLRESS : GOTO, 14S 
PRINT “ЕМІ АГІВЕ55 IN DECIMAL?” 

INPUT 12 : Q=12-11 

IX=11 

IF 11>255 GOSUB 172 

IF Q<£ GOTO 152 

ІР І2<1024 GOTO 160 

PRINT "ILLEGAL АГГКЕ55 : 2070 153 | 

LINE INPUT “EPROM SOCKET EMPTY?(YES OR NO): “3X3 

IF X3= NC GOTO 166 , 
LINE INPUT “IS SOCKET POWER SWITCH ON?(YES OR NO): ;Х4 
IF X4="NO GOTO 164 ELSE GOTO 165 

PRINT "TURN POWER ON : 6070 162 

OUT 4,36 £ | 

ІР LEFTS(Y,5)<> WPROM GOTO 169 

PRINT: PRINT FOLLOWING IS HEX CODE TO BE PROGRAMMMED:" 
00508 1359 ` 

LINE INPUT INSERT 8748 CHIP AND TYPE-GO: ';Х5 

IF X5<> GO GOTO 169 

RETURN 

IF 11>511 GOTO 174 

fate 11=[11-256: RETURN 

IF 11>757 GOTO 176 

№1=2: 11=11-512: RETURN 

№1=3: 11=11-768 

RETURN 
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ШБЕМБІҮ ОЕ 20065” 


LINE 


HEX 
06 

Д, 
902 
205 
205 
ав? 
209 
ССВ 
VOL 
00: 
00: 
01% 
@12 


COLE 


0405 
2% 
0428 
E244 
ЕЕ 
ВАЗІ 
ВВСА 
c 
787 
co 
ро Т 
SA 
20 
Zen 
29 
20 
21 
EU 
2 
05 
09 
c Ó 
20 
ка 
ce 


APPENDIX J 


Sample Assembler Printout 


COMPLETED 


LABEL 


START: 


БООР: 


INT: 


UNTIL: 


OPCODE 


ORIG 
ӨЛШЕ 
NOP 
JMP 
MOV 
MOV 
MOY 
MOV 
NOP 
NOP 
NOP 
MOV 
OUTL 
NOP 
ON 
CUTL 
МОР 
ONE 
NOP 
ENTE 
EN 
NOP 
NOP 
NOP 
NOF 
NOP 
MOV 
OUTL 
JMP 
NOP 
NOP 
NOP 
MOV 
OUTL 
INS 
ANL 
XRL 
NOP 
NOP 
JNZ 
NCP 
JT 
МСЕ 
МОР 
MOV 


98 


ОРІГАМІ 
260 
START 


INI 
Rowe Os 
ВЕТ 
a З 
по, РТС 


COMMENTS 
РОЯЧЕЗ UP 
SINTERRUPT 


рой Р р. 


SENABLZ3 F1 
; 303 TO 81-7 


;MAKES ТО А СТОСХ 


‚ENABLE 2212 
¿LOOP 


ENTER ROE E 
OL OP PRS =S 
РОТ 

ONE о 
CHECK 


TEND Ir NO Ce 


‚ТОСОР TIL 590-1 





222 2355 oe OUTL re zu ВЕЩА 
47 OSA AE MOV 4, Ки 

48 055 22 СӘТІ, BUS- A ‚OA On 3053 

49 256 2520 MOV А. ВСС 

50 255 ЗА OUTL PENIS ;PZ LOW 

E 051 Zoli MOV А #17 

IE 041 ЗА OUTL Bed jane. STROBE 
55 042 Ei SEND MOVX A (R1 БОНА НИЕ? 
54 845 20 BACK: NCP 

595 044 8643 JNI BACK ‚LOO? TIL EOC=1 
56 246 ек WAIT: NOP 

s 247 964B JT1 REA LY ‚JUMP TO 24A 
58 049 0446 УМР WAIT 3 LOOP 

99 04B 29 READY: R&T ıRSTUHN 

66 ENT 


SYMEOL TAELE: 


Bahr ---005 
һООР---@02@ 
an 28 
шиш ---Й 52 
БОРЕ = #42 
ВАСК-- 045 
иа Е 1---#46 


RSADI---24B 


О Ш SanOko LSTSGTED <<< 
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